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W- j j Esl mort / DTP-PAO, adaptation de “The Desktop Publisher” de Database Software, 
° vous sort du carcan du TT (Traitement de Texte) et vous ouvre un potentiel 


de graphismes sur votre PCW. A l'aide de DTP-PAO vous avez la possibilité 
de créer vos propres prospectus, publicités, en-têtes, bulletins d'informa- 


® tions, puis de les imprimer avec des titres, des textes et des graphismes 
VIVC [A = disposés exactement selon la mise en page que vous avez choisie. 
.. ° 


Convivialité 


C'est d'une simplicité déroutante! 

Utilisant les touches du clavier ou 
une souris AMX, Kempston ou Elec- 
tric Studio, vous déplacez un poin- 
teur visualisé à l'écran et “cliquez” 
sur l'option sélectionnée. Des menus 
déroulants vous donnent instan- 
tanément accès à toutes les pos- 
sibilités de DTA-PAO. 


Fonctionnement du logiciel 


Vous démarrez en préparant votre 
mise en page. Vous décidez du 
nombre et de la largeur des colon- 
nes de texte, ainsi que de la pos- 
ition des fenêtres qui contiendront 
des graphismes, des titres et des 
sous-titres. 

Vous chargez votre texte préparé 
avec LocoScript où tout autre logi- 
ciel de TT capable de produire un 
fichier ASCII. L'Editeur-Texte de 
DTP-PAO vous permet de créer un 
texte ‘’justifié”’ avec des caractères 
gras ou italiques affichés comme 
ils seront imprimés sur papier. 

Vous pouvez créer des graphi- 


smes avec l'Editeur-Graphique très 
puissant de DTP-PAO. Vous 
dessinez des lignes, des boîtes, des 
triangles et des ellipses. Vous 
remplissez des secteurs ou vous 
peignez à main libre en vous serv- 
ant d'un des 16 motifs disponibles. 
A l'aide d'une ‘loupe’ vous retou- 
chez votre dessin point par point. 

Il Y a même un Editeur-Police 
(éditeur de fontes) qui vous permet 
de créer vos propres polices de 
caractères pour vos titres. 

Quant tout est prêt, vous pouvez 
faire paraître à l'écran votre chef 
d'oeuvre en miniature, et l'imp- 
rimer. 


Voilà ce que vous aurez ... 
Une disquette double face qui con- 
tient les trois programmes prin- 
cipaux, une sélection de ‘‘Clip-Art” 
(fichier de graphismes tout prêts), 
des polices de caractères supplé- 
mentaires, une page d'exemples, 
et un manuel d'instruction très 
complet. 


DTP PAO 395F 


Souris AMX 695F 


MasterScan 695F 


Digitaliseur VIDI 
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DATABASE SOFTWARE 


Texte... Graphismes... Visualisation de la page 
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Le premier 
pour votre 


POYER PRODUCTS annonce le 
prochain lañcenent du premier 
progiciel intégré congu exprès 
pour votre PCW, 

Naissance prévue! 16/1/88, La 
version française du 
"Mini-Office Professional" de 
DATABASE SOFTUARE est composée 
de S nodules interactifs: 

1) IRALTEMENT DE TENTES Plus 
rapide que #RRÉAXXFÉ avec des 
fonctions étonnantes!  WYSWYG 
(What you see is what you get = 
On affiche à l'écran ta qui va 
se trouver inpriné), puis des 
caractères double-hauteur, ett,, 
2) BASE DE DONNEES Plus 
conviviale que #KKXXHHRX, Créer 
des fichiers accessibles de 
clients, votre collection de 
tinbres, les nenbres du club ,., 
3) IABLEUR Plus grand que KKK#R 
255 colonnes x 255 lignes, 

12000 cellules disponibles, 
4) GRAPHIQUES Plus chic 
Monsieur RA#k 

Camenberts at histogrannes, 
5) COMNS-MODEM Relier votre PC 


à un modem ou à un minitel, 


uite,,,,, 


POUER PRODUCTS FRANCE prépare une série de produits pour votre 
PC, Les perspectives pour 1988 sont riches pour les amateurs du 
PCW, qui attendent enfin avec impatience de pouvoir utiliser à 
fond les possibilités de leur ordinateur, 


que 


Nous pouvons déja vous annoncer les produits suivants: 


Son 
une 


1) Une TABLETTE GRAPHIQUE Ad 
logiciel permet de travailler à 
bibliothèque de synboles, 


OTP-PAO, 
avec 


compatible avec 
l'échelle et 


2) Une INTERFACE MIDI qui vous permettra le branchement d'un 
clavier musical ou d'un synthétiseur à votre PCW, 


3) Le MICROFAX qui convertira votre PCW en micro-télécapieur 
4) Une série de pragranmes de CASSE-TETES LOGIQUES, 


5) Des disquettes de fichiers graphiques CLIP-ART pour le 
OTP-PAO, Ecrivez-nous pour suggérer des thèmes, ,,,,., 


POVER PRODUCTS FRANCE cherche à vous satisfaire, Qu'attendez-vous 
conte progranmes ou comme extensions? Ecrivez-nous, ..,, 


Peter Watts 

Produits Nouveaux 
POUER PRODUCTS FRANCE 
Cour de la Gare 

50200 COMPIEGNE 
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ntéegre 
3/2 


Chacun des nodules est conçu de 
façon facile à l'enplai, 

Vous sélectionnez une option avec 
une touche ou en déplacant le 
curseur sur une liste affichée 
puis vous appuyez sur RETURN, 
C'est aussi sinple que Ça... 

Des messages d'aide s'affichent à 
chaque étape dans chaque 
programme, Vous tirerez un maximun 
d'un module avec un  minimun 
d'effort, 

Les nodules sont interactifs, 
Exenples: 

- Les nons et les adresses de la 
Base de Données peuvent être 
incorporés dans le Traitement de 
Textes pour faire des Mailings, 

- Les rapports préparés par Île 
Traitement de Textes peuvent être 
envoyés par téléphone vers un 
autre ordinateur à l'aide du 
nodule COMNS-MODEN, 


PRIX DE LANCEMENT: 895 F TTC 
C'est presque le prix d'un module 


seul mais c'est un prix style 
AMSTRAD et POWER PRODUCTS FRANCE, 


Bon de Commande 















[à retourner à ES FRANCE Sarl Le 
60200 PU > 
Tél: e* 

Je ne peux plus un … je veux enfin être libéré, .[K 
ne : ; n 
Envoyer-moi vite les produits suivants: = 
Logiciel seul PORER DTP-PAO .,,.,.,,,,,,,.,,,.,, 905F|= 
SAUEDS ALT MRÉRTÉ IDE 2 uicranesiremsenneus M9 Q 
PORER MasterScan avec logiciel SCAN,...,.,,,...,, 695 F | 
logiciel seul PCY PAINT 6 315F [ex 
Æ . (y) 
Nos cffres spéciales 3 

PORER DTP-PAO + Souris AMX + Interface ...,.,.., 895F 

FONER DTP-PAO + PORER MasterScan ..,,.,.,...,.,, 895F o 
[TP-PAO + Souris AMX + Interf.+ MasterScan ....,, 1595 F | 
LT. PAO + Sour .AMX + Int.+ MasterScan + PCN Paint 1150 F | -Q 
LTP-PAO + Digitaliseur VIDI .150FIS 
[TP-PAD + Digitaliseur VIDI + Souris AUY + Intf.. 2305 F @ 
[TP-PAO + Digit.VIDI + MasterScan ,,.,.., DB FI> 
FTP-PAO + Dig NIDI + Sour .AMX+Intf. HW Scan+PON Pi 2005 À u 
Lie de sous DIS PA DURE" suscsssascsaceesvuse NTlS 
interface RETENIR RMS 695 F|— 
MN mea roues ee DOS 
mr ane see aan DIRES 
LAMOCLES RER CR I …. 1625 F a 
ANNALES DE ROME (Simulation À “partir ‘de 21) av, JC) A5F 
RS D | 
DRE TEEN O 





Fort compris 
Je paye par chèque/CCP/Carte Banéairé Niro 


STÉNAIUTÉ ODLIPA DIE sr rcrureDA Le AA na tous 
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L'ECHO ? SUIVEZ LE GUIDE... j 


Disquette Echo : Tous les programmes de ce présent numéro sont 
regroupés sur une seule et même disquette dont le numéro correspond à 
celui du journal. 

Anciens numéros : Les anciens numéros de l'Echo du PCW sont 
encore disponibles. 

Reliure Echo : La reliure Echo est personnalisée au sigle du journal et 
permet de classer une année entière, soit | | numéros. 

Pour vous procurer un ou plusieurs de ces articles utilisez ou recopiez le 
bon de commande situé en page centrale. 
Publicité : Le tarif de publicité est disponible 


sur simple demande par courrier. 
Papier à en-tête : Un échantillonage de papier 
personnalisé peut être obtenu par courrier 


accompagné de 10 F en timbres. 








En couverture : le PCW est loin d’être 


abandonné par son éditeur préféré avec une nouvelle gamme de choc ! 
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VIVEMENT LA RETRAITE 


est empli d'une mélancolie sans égal qu'il faut que je me rende à la 
raison... 28 ans, déjà, et me voilà pris d'affreuses aigreurs au moment 
fatidique de l'édito maison. 


Me triturant le bulbe, j'envisage tout et rien. On pourrait démarrer sur 
l'étonnante étude du contexte actuel, mais cherchant bien les mots j'en 
oublie le sujet... Contexte, contexte, vous avez dit contexte ? 


Je creuse un peu plus fort pour sauter à pieds joints sur l'hilare dans l'art 
et j'en ris tellement que j'en perds tout le mien. Je m'insurge, je me frappe 

le cœur, je tente une percée dans une inspiration qui danse dans 

le vent. Le vent ! Quelle idée: Le vent le voile sur ma galère, 

j'en appelle à ma muse partie chercher du lait. Prise dans un 
embouteillage de laids elle ne veut plus rentrer. Cette 

ingrate m'abandonne et j'use des touches innocentes qui 

voudraient bien comprendre là où je veux les mener. 


Nous y voilà enfin: ‘‘Il était une fois un sujet qui 

passait et qui s'est envolé quand j'ai voulu 

l'happer.…‘". L'happer, l'happer, le lait, ma 

muse me téléphone pour s'excuser de 

l'heure mais elle reste chez sa mère et C 0 

me laisse haleter. Et les heures NFIp 

s'enfuient pour retrouver leur loge + DEN 
(ouf...), même le curseur "4, 


s'ennuit de l'absence des 
mots et nous nous en- 


dormons sur un seul 
regret : il est si tard 
déjà qu'il faut se \ 


séparer @ @ 
e 
© 
© 
© 
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._ OFFRE EXCEPTIONNELLE 
RUBANS POUR IMPRIMANTE 


Cette offre 
spéciale est 


valable du 
01/12/87 
au 31/01/88 





*x QUALITE SUPERIEURE * 


















Après des mois de recherche, le CLUB de l'ECHO DU PCW est 
enfin en mesure de vous présenter des rubans imprimante de 
qualité exceptionnelle, d'une longévité et d'un noir intense 
comme vous ne les avez jamais vus! 


RUBAN PCW 8256/8512 


INCROYABLE! 
Par 3 Pièces: 65f l'unité 


MEMBRES DU CLUB ECHO: 60 * f l'UNITE! 


Délai de livraison maximum: 10 jours 


(*) Ce prix est exclusivement réservé aux membres du club 
ECHO DU PCW 


”__.. CCC CCC CCC CC 
* BON DE COMMANDE CLUB ECHO DU PCW # 

















Li 

= 

, (France exclusivement) 

= NOM: PRENOM: 

à ADRESSE: 

L ] 

cs Je commande par la présente: X 3 Rubans à 195Fles 3 soit... XTOSF = rire 
> X 3 Rubans à 180 F les 3 soit ……. NIBOF = ne () 
. j'ajoute 15 F pour les frais de port et d'emballage 

s (*) PRIX SPECIAL POUR LES MEMBRES DU CLUB ECHO DU PCW (Indiquez votre numéro: ) 
« Ci-joint mon règlement parl] MANDAT [|] CHEQUE [|] CCP Signature obligatoire: 


“ Adressez votre règlement à l'ordre de LOGI'STICK éditions 
a Centre d'Affaires Paris Nord - “Le Bonaparte" - Boîte 49 - 93153 Le Blanc Mesnil cédex 











PLUS ROMBO TU MEURS ! 


Officiel, le digitaliseur VIDI pour PCW vient de 
recevoir la plus haute distinction britannique en se 
voyant attribuer le BRITISH AWARD 87 pour 
l'extension que nous présentions dans 
l'Echo du PCW N°12. Venu person- 
nellement présenté son extension 
sur le stand ECHO lors de 
l'AMSTRAD EXPO, MARCUS 
SHARP, son concepteur, a avoué 
modestement être comblé par un 
tel honneur. 

Confidence pour confidence 
MARCUS à aussi révélé qu'il 
mettait une dernière touche à 
sa version PC-1512 et qu'il 
pourrait bien en confier la 
traduction à LOG/'STICK... 
Affaire à suivre. 


AVOCAT BIS 


CP Informatique (rien à voir avec CP Software) 
vient de mettre au point le logiciel ETAT/CALC 
destiné aux avocats. 

Particulièrement axé sur la facturation des honoraires, 
ce logiciel tient compte des frais de procédures 
devant les tribunaux de grandes instances qui, aux 
dires des concernés, n’est pas une sinécure… 

Pour citer quelques unes de ces caractéristiques, 
mentionnons qu'ETAT/CALC se charge de gérer les 
postes suivants : 

- Droit fixe sur instance 

- Calcul des débours 

- Actes d’huissier 

- Forfait photocopies (eh oui, même ça !) 

- Actes du palais 

- Actes divers 

- Droit proportionnel 

- Droit gradué 

- Droit de plaidoirie 


Et pour le prix, le programme accepte les provisions ! 


Aussi disponible en version MS/DOS pour PC, 
ETAT/CALC s'obtient auprès de : 


CP prontnQuE 
| à V 





LE PCW POUR PETITE ENTREPRISE 
ET MOYEN ORIENT ! 


Par la grâce d'IRAM EDITIONS, le PCW se voit 
enfin doté d’un logiciel de traitement de texte en pur 
Arabe. 
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Offrant deux sets de caractères, 

Naskhi et Koufi, il donne aussi accès à 

douze formes de caractères. 

Les spécificités d'ensemble restent 

conventionnelles à savoir : 

- Déplacement rapide dans le texte 

- Fonction couper/coller et word- 

wrapping (coupure automatique) 

 - Recherche et remplacement de mots 

- Centrage, soulignement et interlignage 
variable 

- Justification gauche et droite, marge 
variable, tabulation et indentation 

- Pagination et numérotation 
automatique des pages. 


Ainsi accompagnés, les 850.000 PCW 
déjà répandus à travers l'occident 
risquent de voir se multiplier les cousins 
orientaux. Espérons que cela servira au 
rapprochement des peuples ! 


ALEF-BA (c'est son nom) est distribué 


en France par : WIN GS MICRO INFORMATIQUE | 
57 RUE DE CHARONNE 
75011 PARIS. | 


go Yl pulall din 
gps 





JO SN > — 
Tase « 
Gé 


= 


sis - 
Jag 


ggealul 





















AMSTRAD TOUJOURS PLUS FORT ! 


Annoncé simultannément en grande pompe au 
COMDEX de LAS VEGAS et à AMSTRAD 
EXPO de PARIS avec près de 6 mois d'avance, le 
nouveau bébé d'AMSTRAD risque fort de faire 
grincer plus d’un ratelier… 
Le PPC 640 est véritablement un bébé puisqu'il est 
portable, petit, puissant et à un prix... AMSTRAD ! 


Ses pré-spécifications (AMSTRAD France n’a montré 
qu'un clip vidéo mais pas la bête...) laissent imaginer la 
relève des portables disponibles actuellement : 


- Un lecteur 3’5 de 720 Ko en standard plus | en 
option. 

- 512 Ko de mémoire extensible à 640 Ko 

- Ecran LCD de 80 par 25 caractères ou 640 par 200 
pixels 

- Prises parallèle et série intégrées 

- Modem V-21, V-23, V-22 et V-22 BIS (2400 BDS 
FULL DUPLEX) intégré ! 

- Clavier 102 touches du type AT. 

- MS/DOS 3.3 et logement prévu pour le co- 
processeur mathématique 8087 

- Autonomie par piles baton de huit heures. 


L'ensemble pour un prix frisant les 5000 F HT, on 
croit rêver et les réactions des concurrents ne 
devraient pas traîner. Une belle bataille en perspective 
dont l'échéance est fixée à Avril 88... 





+68,164 861,00 











SUIVEZ LA REPRISE... 


Accord au sommet entre ESAT SOFTWARE et 
LOGPSTICK pour la co-édition de deux logiciels. Le 
premier, HERAKLIOS, l'outil suprême pour les 
disquettes et le second, BOURSE 2000 est le 
programme que tous les spéculateurs PCWistes 
espéraient sans plus y croire. 

Pouvant gérer une infinité de valeurs sur un maximum 
de trois années, BOURSE 2000 permet un suivi 
régulier des cours avec une étude graphique poussée 
et de nombreux indicateurs statistiques permettant des 
prises de décisions rapides et judicieuses. 





















Prochainement testé dans nos colonnes, BOURSE 
2000 fait partie de la nouvelle gamme LOG/STICK 
présentée lors d'AMSTRAD EXPO et dont le 
catalogue est d'ores et déjà disponible sur simple 
appel à : 





DE PLUS EN PLUS DUR... 


Venu de RDA, un nouveau disque dur de 20 méga- 
octets vient d'être présenté à l'AMSTRAD EXPO 
par VORTEX. Compatible avec LOCOSCRIPT., ce 
disque dur nommé VD-2000 se distingue par son 
faible encombrement lié au choix d'un disque 3 
pouces 1/2 Tandon. 


Disponible en Allemagne à un prix frisant les 6000 F 
(2298 DM pour être précis), il devrait l'être prochai- 
nement en France dès que 
VORTEX aura choisi le 
distributeur de ses rêves. 


En attendant informations 
et disques durs pourront 
être obtenus directement 


chez : 





‘seul ! 









L'ACE DES ACE... 


Voilà le dernier bébé de CASCADE LTD qui 
débarque en trombe et pour cause, c'est un véritable 
simulateur de vol qui propose de se retrouver maître 
à bord d'un bombardier aérien. 

Au niveau de la vitesse de réaction ce jeu n'est pas 
sans rappeler le célèbre TOMAHAWK avec lequel 
il partage maintenant une souplesse de jeu fort 
remarquable et 

de LL LT LIL 
consommé. 
Offrant LL] 
plusieurs 
niveaux de jeu 
et de missions 
(attaque 
aérienne, 
maritime 

ou au sol), 
ACE devrait 
devenir le 
simulateur 
numéro F À 
sur PCW. CANES-LTD 


“AT LT vou onn REnLY nv” 





BOMBE 
AC 


Des jeux, des jeux qu'ils disaient. 


Par Marc Hermion 


Le PCW 
n'en a pas assez qu'ils répétaient sans cesse. 
A croire que le PCW est une machine triste 
pour utilisateurs sérieux. Tout faux ! nous 
apprend LORICIEL 
en nous offrant, non 


(oriciels : L a] p 


pas un, mais trois 


jeux d’un coup, d’un | 





Et quels jeux ! Du grand art chez ces gens-là. On ne 
lésine ni avec les moyens, ni avec les effets spéciaux. 
Il faut avouer que LORICIEL à depuis bien longtemps 
laissé tomber l'artisanat pour transformer nos micros 
en dévoreur de nerfs. 


Pour mieux connaître LORICIEL, je ne peux 
m'empécher de vous révéler quelques uns des chiffres 
les plus significatifs quant à l'envergure de la maison. 
Après quatre ans d'activités fébriles, il compte déjà 45 
personnes solidement attachées dans 1200 mètres de 
bureaux en moquette pure laine de zébu ! 


intégrant son propre studio de création, LORICIEL 
dispose d'un atelier intégré où graphistes et 
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programmeurs s’évertuent à donner à l'informatique 
quelques uns des plus beaux fleurons de l'univers 
ludique. 


Résultat des courses, LORICIEL exporte, grandit et 
continue sans répit à tenter de distraire les puces les 
plus rebelles. Raisonnable et connaisseur, LORICIEL 
nous propose de goûter aux joies de gaspiller les 
heures, à collationner indices et accessoires, de 
frapper du gauche et de courir à l’est pour atteindre 
les nobles buts que d’impitoyables règles nous 
poussent à ÿtteindre… 


Pour citer ces bijoux dans un ordre logique, 
commençons par la plus extraordinaire des trois 
productions aujourd’hui disponibles : 


BOB WINNER 





ORPHEE & TOP SECRET 


La descente aux enfers par la grande porte ! On se 
reveille un petit matin là où on n'avait vraiment rien à 
faire et le délire commence. Chercher, fouiner, 
ramasser objets et dialoguer avec le programme juste 
pour mériter de survivre... Un but intéressant me 
direz-vous... Quoiqu'il en soit, ce jeu est d’un rapport 
temps passé/investissement des plus rentables. Pour 
près de 300 F, les heures occupées se comptent en 
centaines à moins que le PCW n'explose sous le choc 
des coup de pieds qu’on peut finir par lui asséner tant 
certaines situations dans ces jeux deviennent 
exaspérantes par la difficulté que l’on peut éprouver à 
s'en extraire. 


À noter que le dialogue qu'il faut arriver à établir 

avec le programme peut aussi contribuer à pousser les 
plus calmes à des extrêmes dangeureux.. Réapprendre 
à parler, accepter la plus stérile des incompréhensions, 
tolérer la 





CEE eXeMElR dardi {ss ET PRINCIPALECS ): € 
pre Re I A SORCIERE AIME LA MUSIQUE ? 
nombreux sation d’un pe ni 
Sciali discours qui Le FRAPPE A SON TOUR. 
spécialistes q cr 
+ finit par m fr De NE UOULAIT JAMAIS 
BOB WINNER be SeR 
s à : 
ss ” Eh idiot, font CHEZ LA SORCIERE OBJETS PRESENTS : 
es ; 
de Sn partie du lot UNE CLE EN RUBIS 
mation en ee de 
matière d’ani- ces ee 
mation. D'un jeux... Au 
réalisme époustouflant, il laisse les éditeurs MT 
britanniques loin derrière par la qualité des s se 
mouvements et la beauté des décors à côté desquels ps ement 
BAT MAN serait en droit d'exiger une retraite ne 
anticipée avec prime et pension. en roic ne 
lubrique‘* il 


Malheureuseument, on ne décrit pas BOB WINNER. 
On le regarde, on le joue et on se laisse emporter 
par les coups qui le meurtrissent, les bonds et les 
coups bas, les chocs et les surprises et tout ce qui 
transforme un jeu en démente aventure. 


Pour être 
honnète, 
avouons tout 
de même que 
ce jeu n'est 
pas à la portée 
de tous. Les 
impatients, les 
tremblants et 
les pressés 
finiront 
rapidement par demander le divorce avec leur PCW 
bien avant le trois-centième coup de poignard, la cent- 
cinquantième plongée dans la fange boueuse et 
l’antépénultième coup de savate derrière les oreilles. 
Il faut aimer jouer et accepter l'idée que le 
personnage BOB WINNER n'est qu’un vil androïde à 
la régénération facile ! 





BOB WINNER. PRIX PUBLIC : 240 F TTC 


Les deux suivants sont certainement beaucoup moins 
spectaculaires que le premier. Ils n’en restent pas 
moins des modèles du genre pour les inconditionnels 
des jeux de rôles casse-têtes et sans fin. 


NEWS + L'ECHO DU PCW N°14 


répond invariablement ‘‘Je ne comprends pas 
s'extraire‘* insistant avec ‘‘sortir du lieu‘* il nargue le 
fuyard d’un puissant ‘‘Impossible‘".…. Et tout à 
l'avenant. Merci Monsieur cinéma ! 


En conclusion, il faut aimer jouer et accepter l'idée 
que |” improvisation est à bannir. La machine n’a qu'un 
parcours et c'est celui-là qu’il faut trouver. Saluons le 
remarquable travail des auteurs de BOB WINNER 
qui ont réussi à prouver que l'animation sur PCW n'a 
rien d’impossible. Le vieux Z-80 a encore de bons 
restes et rien que pour le vérifier on se doit de 
posséder ce jeu. 


Pour ce qui concerne ORPHEE et TOP SECRET 
le mot de la fin est dur à prononcer tant l'intérêt de 
ces jeux est lié au goût que l’on peut en avoir et dans 
ce cas chacun est juge. Enfin, l’homo-informaticus, se 
devant d'ajouter l'expérience d’un telle aventure à son 
bagage culturel, je lui conseillerais une petite tentative 
de BOB WINNER pour entretenir ses réflexes ou 
de l’un des deux autres 

pour tester sa patience. 

Mais notez que je n'’insiste 
pas sur les risques encourus. 


ORPHEE & TOP SECRET 
PRIX PUBLIC : 295 F TTC 








AST1 


DISPONIBLE SUR PC ET COMPATIBLES 


FE S 


POUR PCW 8256/8512 


| 















Tout 
sur votre personnalité. 


ASTRO 1 


e Carte thème de 
naissance 

e Carte du ciel de 
naissance avec maisons, 
signes, planètes et 
aspects majeurs 

e Interprétation du thème 
de naissance 


ambition 
e Fichier de plusieurs 


centaines de personnes. 
4 









e Personnalité profonde et 





Sachez ce que l'avenir 
vous réserve. 


ASTRO 2 


Comme ASTRO 1 avec en 
plus : 


e Calcul et édition des 
révolutions solaires 
année par année 


e Carte du ciel de chaque 
Révolution solaire 


e Interprétation du 
potentiel de l’année : 
Amour, argent, travail, 
santé, etc. 

NI 






La version complète 
des initiés. 
ASTRO 3 


Version incluant ASTRO 2 
+ ASTRO COUPLE avec en 
plus : 


e Révolutions lunaires 


e Directions Primaires 
{avec pôles des planètes) 


e Directions Progressées 
et Symboliques 


e Calcul du Maître de 
Nativité selon la méthode 


de Volguine. 
(a, 


À 
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Découvrez 

votre entourage... 
ASTRO COUPLE 
e Carte du ciel composite 
e Aspects planétaires 

e Comparaison des thèmes 


e Interprétation des 
relations du couple 
(plusieurs pages) 
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INITIATION 


SYSTEME-EAPERT AVEC DBASEI 


par PATRICE BIHAN 


Nous avons largement commenté, dans les deux précédents articles, les principes . 
et le fonctionnement de notre noyau de système-expert. En fait, nos explications 

portaient plus sur ce système plutôt que sur la façon dont il avait été conçu en 
Dbasell. Pour satisfaire les lecteurs débutants, il nous a semblé bon d'expliquer : 
maintenant tous les autres modules, hors du système-expert lui-même, c'est-à- 
dire les modules gérant les fichiers. Il va sans dire qu’en ôtant la spécificité due 
au système-expert, tout ce qui va suivre peut s'appliquer à n'importe quels fichiers. 


La gestion des faits : 


Rn 





| ERASE 





SELECT PRIMARY ; 

… USE FAITS L 
| STORE “O“ TO TEST L] 
| DO WHILE TEST =“O“ ï 
à 5,10 SAY “ ***GESTION DE LA BASE DE FAITS***" 5 
à7,10 SAY “A Ajout de fait“ : 

| à9,10 SAY “M Modification de fait“ î 
:!: à 11,10 SAY “E Effacement de fait“ | 
| à 13,10 SAY “L Liste des faits“ ï 
… à 18,10 SAY “ Entrez votre choix“ : 
“ WAIT TO CHOIX 1 
| DO CASE i 
CASE !(CHOIX) = “A“ : 

DO AJOUT_ F | : 
CASE !(CHOIX) = “M“ É 

DO MODIF__F . 
CASE !(CHOIX) = “E“ : 

DO EFFA_F : 
CASE !(CHOIX) = “L“ : 

DO LISTE__F FI 
ENDCASE à 
DO CONTINUE : 

« ERASE 4 
à ENDDO 
« RETURN Las 
 _ à 





Ce module affiche donc sur l'écran les différents 
choix possibles de traitement des faits. On comprend 
que les choix sont définis dans une boucle DO CASE 
… ENDCASE. Chaque choix chargeant à son tour le 
module désigné à la suite de DO. 


L'entrée préalable de “O“* dans la variable TEST 
permet d'activer une boucle DO WHILE...ENDDO. 
La sortie (ou non) de cette dernière (et donc de ce 
module de gestion de faits) est commandée par le 
module CONTINUE : 


? ‘Entrez O pour continuer sur ce module ou N 
pour Menu Principal" 

WAIT TO TEST 

STORE !(TEST) TO TEST 

RETURN 
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(Troisième et dernière partie) 





RER Re nne 
ERASE 

à 5,10 SAY “ *** BASE DE FAITS ***“ 

STORE ‘“O“ TO TEST 





ee 





| Nu 
ê DO WHILE TEST = “O“ ê 
« ERASE î 
À à 10,10 SAY “Ajout d'un fait (RETURN pour finir} W 
“ APPEND BLANK 5 
Ë ? “Numéro du fait :“ , # ë 
STORE “ “TOF À 
Ÿ à15,10 GET F PICTURE “mme 4 
« READ à 
À REPLACE FAIT WITH F | 
D if FAIT="“ « ï 
| store “N“ to test î 
“ DELETE NEXT | b 
« PACK k 
É ENDIF EI 
« ENDDO b 
| RETURN | 
drame Net 





Sachant que la base de faits, nommée FAITS, est 
ouverte préalablement, le module AJOUT _F 
s'articule autour de la boucle DO WHILE TEST = 
“O“... ENDDO. Cette dernière est active tant que 
la valeur entrée dans TEST vaut bien ‘‘O‘'. Cette 
valeur est initialisée à ‘‘O‘*', pour ‘OUI, et peut 
être mise à ‘‘N''. 


Pour ajouter un fait, on se sert de l’ordre APPEND 
BLANK, qui crée en fin de fichier un enregistrement 
vide, que l’on va donc remplir. Le système affiche 
ensuite le numéro de cet enregistrement avec 
l'instruction #. Puis on entre dans une variable F le 
fait, formaté à l'écran grâce à GET F PICTURE 
etc. Cette variable peut ensuite être stockée dans le 
champ FAIT de la base FAITS. 


Un test est effectué sur le contenu du champ FAIT. 
Si ce contenu est vide, c'est que l’on a entré 
RETURN à la question préalable 





à 10,10 SAY “ Ajout d'un fait (RETURN pour 
finir)" 


et donc on peut stocker ‘’N'' dans TEST (ce qui 
signifie bien que l'on arrête) ; du coup, le fait créé, 
étant toujours vide, il convient de ne pas le garder 
dans la base de faits. C’est pour cela qu'on efface 
avec DELETE NEXT I et PACK l'enregistrement 
vide ; par ailleurs, comme TEST ne vaut plus ‘‘O'', 
le système comprend qu'il faut sortir de la boucle, et 
donc sortir du module. En revanche, si le contenu de 
FAIT n'est pas vide, la valeur contenue dans TEST 
est toujours égale à ‘‘O‘', puisque inchangée ; cela 
permet donc de continuer l'activation de la boucle. 


AS LE CCR EU 


. ERASE 
: USE FAITS 
: à 5,10 SAY “***EFFACEMENT DE FAITS***“ 


STORE ‘“O“ TO TEST 


DO WHILE TEST = “O“ 


à 10,10 SAY “ Entrez le numéro du fait à effacer“ 


INPUT TON 
GON 


? “ Voici le fait : “ 

DISPLAY 

? “ Voulez- vous l’effacer réellement O/N ‘ 
WAIT TO EFF 


IF!(EFF) = “O“ 

DELETE NEXT I! 

PACK 

? “ Le fait n° “,N, ‘ est effacé“ 
USE FAITS INDEX INDFAIT 
REINDEX 

ENDIF 


à 20,10 SAY “Voulez vous continuer à effacer O/N“ 
WAIT TO TEST 

STORE !(TEST) TO TEST 

ERASE 


ENDDO 


RETURN 


Ici également, le même type de boucle est effectué. 
Le module demande d'entrer le numéro du fait à 
effacer, INPUT TO N, et positionne son pointeur 
sur ce dernier grâce à GO N. Le fait en question est 
alors affiché sur l'écran, et, par prudence, une 
question est posée demandant de confirmer ou 
d'infirmer cet effacement. 


Système 
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Si oui, le module va donc successivement : 


- Marquer en instance d'effacement l'enregistrement 
courant, avec DELETE NEXT I, 

- Effacer définitivement cet enregistrement avec 
PACK, 

- Recréer un index cohérent avec : 
USE FAITS INDEX INDFAIT et 
REINDEX. 


Un autre test est fait ensuité pour continuer ou non à 
effacer, et cela en changeant (ou non) la valeur de 
TEST. 





La modification des faits 


ERASE 
à 5,10 SAY ‘“ “** BASE DE FAITS ***“ 
STORE ‘O“ TO TEST 


DO WHILE TEST = “O“ 







à 10,10 SAY ‘“ Entrez le numéro du fait à modifier“ 
INPUT TON 


STORE FAIT TO F 
READ 
REPLACE FAIT WITH F 


… à 20,10 SAY “Voulez vous continuer la modification O/N“ 

 WAIT TO TEST 

: STORE !(TEST) TO TEST 
ERASE 


| ENDDO 
RETURN 


La modification d'un fait ressemble à la fois à l'ajout 
et à l'effacement, ce qui n'a rien d'étonnant en soi, 
car une autre façon de modifier un fait est bien de 
l'effacer puis de l'ajouter, corrigé. Cela est bien sûr 
efficace, mais présente l'inconvénient de réécrire un 
fait en entier, même si la modification ne porte que 
sur un caractère. || vaut mieux procéder autrement, 
et, comme ici, afficher le fait et le corriger 
directement, dans le texte. 


L'habituelle boucle est effectuée sur TEST, dans le 
cas où l'on désire modifier plusieurs faits. Dès que le 
système sait le numéro du fait à modifier, il en affiche 
le contenu grâce à GET... PICTURE et READ. 
Ainsi, on peut modifier tout ou partie du fait 
aisément. 
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PROGRAMMATION BASIC 


La liste des faits 


ERASE 

? URLLLLLLLLELL,] LISTE DES FAITS LÉELLLLELLLLLE LL 
? 

GO TOP 

LIST 

RETURN 


Je ne vous ferai pas l'injure de commenter ce 

module ! Pour ceux qui viennent en cours de route, 
GO TOP sert à positionner le pointeur de Dbase en 
haut du fichier, c’est-à-dire sur le premier 
enregistrement. Du coup, cela m'inspire une petite 
question, pour voir ceux qui suivent : comment 
positionner le pointeur sur le dernier enregistrement ? 
Avec GO BOTTOM, bien sûr ! 


La gestion des règles 


À de cd 
ERASE 
DO INITIAL 


SELECT SECONDARY 
STORE ‘“O‘“ TO TEST 


DO WHILE TEST =“O“ 


à 5,10 SAY “*** GESTION DE LA BASE DE REGLES ***“ 
! à7,10 SAY “A Ajout de règle“ # 
 à9,10 SAY “M … Modification de règle“ 

à 11,10 SAY “E Effacement de règle“ 

à 13,10 SAY “L …. Liste des règles“ 

D à15,10 SAY “P Permutation de règles“ 
… à 18,10 SAY “ Entrez votre choix“ ' 


WAIT TO CHOIX 
DO CASE 


… CASE {CHOIX) = “A“ 

DO AJOUT_R 

| CASE (CHOIX) = “M“ j 
DO MODIF_R : 
Ü CASE (CHOIX) = “E“ : 
“ DOEFFA_R 4 
À CASE (CHOIX) = “L“ F 
* DO LISTE_R 4 
« CASE (CHOIX) = “P“ 4 
| DO INVER_R 

| ENDCASE 


: 
. DO CONTINUE j 
# 
À 





a _ _— 







ERASE 
ENDDO 
RETURN : 


A AT RE 





Pas de commentaires sur ce module, si ce n’est pour 
signaler qu'il est identique dans sa structure au module 
gérant des faits. 


L'ajout de règles 


Comme pour les faits, on crée au préalable un 
enregistrement vide en fin de fichier, en l'occurrence 
REGLES. Puis on initialise une variable CLAUSE 
faite de 30 caractères espaces, que l’on stocke dans 
les 5 champs principaux de l'enregistrement. Il ne 
reste plus qu’à afficher chaque champ et son nom 
pour permettre la saisie directement sur l'écran ; 
rappelons que, grâce à ces instructions, GET et 
READ, on peut écrire et corriger sur l'écran. 
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# 
ERASE 


à 1,10 SAY “ *** ENTREE DE REGLES ***“ 
STORE ‘O“ TO TEST 
DO WHILE TEST = ‘“O“ 


APPEND BLANK 
? “ Regle n°“,# 


STORE “ 

STORE CLAUSE TO CONCLUSION 
STORE CLAUSE TO CONDITIONI 

STORE CLAUSE TO CONDITION2 

STORE CLAUSE TO CONDITION3 

STORE CLAUSE TO CONDITION4 


à 6,10 SAY “Conclusion“ GET CONCLUSION PICTURE “{frntnnnnnnentttennee 





READ 


à 20,10 SAY “ Voulez vous continuer à entrer des règles O/N “ 
WAIT TO TEST 

STORE !(TEST) TO TEST 

 ERASE 


ENDDO 
RETURN 





L'ensemble est validé dès que l’on entre RETURN 
sur le dernier champ. 


Comme précédemment, on peut choisir de continuer 
à entrer des règles ou pas avec ‘‘O‘‘ ou ‘‘N'‘ dans 
TEST. 


L'effacement de règles et leur modification se font de 
la même façon que pour les faits. 


La permutation de règles 


ERASE 

2“ *** PERMUTATION DE REGLES ***‘ 
STORE 0 to NI 

STORE 0 to N2 


ÿ 
Ë 


à 12,10 SAY “Première règle: “ GET NI PICTURE “***“ 
à 12,50 SAY “Seconde règle : “ GET N2 PICTURE “*** 
READ 

GO NI 

? “Première règle“ 

DISPLAY 

STORE CONCLUSION + CONDITION + CONDITION2+ CONDITION3+ CONDITION TO REGLEI 
? “Seconde règle“ 

GO N2 

DISPLAY 

STORE CONCLUSION + CONDITIONI + CONDITION2+ CONDITION3 + CONDITION TO REGLE? 
GO NI 

REPLACE CONCLUSION WITH S(REGLE?2,|,30) 

REPLACE CONDITIONI WITH S(REGLE?2,31,30) 

REPLACE CONDITION? WITH S(REGLE?2,61,30) 

REPLACE CONDITION3 WITH S(REGLE?2,91,30) 

REPLACE CONDITION WITH S(REGLE?2,121,30) 

GO N2 

REPLACE CONCLUSION WITH $(REGLEI, 1,30) 

REPLACE CONDITIONI WITH S(REGLE1,31,30) 

REPLACE CONDITION? WITH $(REGLE1,61,30) 

REPLACE CONDITION3 WITH S(REGLE1,91,30) 

REPLACE CONDITION WITH S(REGLE1,121,30) 

? “Fin de la permutation“ 

RETURN 





a 2 


SE 


pige 


nan 


SE ns 





‘“ TO CLAUSE 


ES 


à 10,10 SAY “Pour permuter deux règles, il faut entrer leur numéro“ 





Er 
1 


ee 
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es commande de 


de cet 


se trouvent sur la disquette 








Nous proposons ce module simplement pour montrer 
comment on peut permuter deux enregistrements 
dans un fichier et également pour permettre de voir 
comment le système résoud un problème dès que l'on 
permute des règles. 


Le principe de fonctionnement est très simple; on 
sauve le contenu des deux règles de numéro NI et 
N2 à permuter dans deux variables, REGLEI et 
REGLE?2. Puis on replace REGLEI à l'emplacement 
de N2 et REGLE2 à l'emplacement de NI. 
Profitons-en pour voir un petit problème. Il n'y a pas 
en Dbase une instruction du genre SWAP, échanger, 
comme en BASIC. Dans ce langage, pour permuter 
le contenu de deux variables, on énonce : 


SWAP REGLEI, REGLE2 


Ce qui simplifie grandement les opérations. Ceux qui 
ont fait du Basic dans des temps anciens et reculés 
savent que la commande SWAP n'existait pas ; se 
pose alors le problème suivant : comment échanger 
deux variables ? Simplement en usant du subterfuge 
consistant à utiliser une tierce variable temporaire. 


Pour mettre REGLEI dans REGLE2 et 
réciproquement, il suffit de dire : 


e Je mets REGLEI dans TEMPORAIRE, 
e Je mets REGLE2 dans REGLEI, 
e Je mets TEMPORAIRE dans REGLE2. 


article 


Nous aurions pu le faire dans notre module, 
mais au prix d'une petite gymnastique avec 
les enregistrements qui se manipulent moins 
facilement que de simples variables. On le 
constate d'ailleurs avec les lignes du genre 























REPLACE CONCLUSION WITH $S(REGLE2,1,30) 


et consœurs qui découpent une chaîne de caractères, 
en l'occurrence un enregistrement complet, en petits 
morceaux, lesquels sont simplement chacun des 
champs de cet enregistrement. Le découpage est 
autorisé par l'instruction $, qui rappelle MIDS du 
Basic. Les trois arguments de $ sont successivement le 
nom de la variable chaîne à découper, le lieu du début 
de la sous-chaîne et sa longueur. On remarquera donc 
que chaque second argument de $ est le début du 
champ spécifié dans la chaîne complète : 1, 31, 61, 
91, 121. 


Pour conclure sur ce système-expert, je vous propose 
une autre manière de coder les informations, celle qui 
consiste à attribuer un numéro à chaque fait et règle, 
et à n'utiliser que les numéros ainsi créés. Ce qui suit 
est issu d'un courrier de Jacques GAIGNARD, de 
BEGLES ( qu'il en soit remercié !) : Ë 


. soit une base de textes de 30 caractères : 


0010 II a de l’angine 

0020 II a de la fièvre 

0030 Il présente une éruption très caca berk 
0040 Il présente de la torpeur 

1010 Le patient a la scarlatine 

1020 Le patient a la typhoïde 

1030 II n’a rien: qu’il retourne travailler 


Ps a 





et la base de règle suivante : 


1010,0010,0020,0030 
1020,0020,0040 


Bien que tout ceci soit identique à ce que l'on a déja 
vu, on se doute que le système use moins de place en 
mémoire et sur le disque, et donc fonctionne plus 
rapidement. Longue vie à Jacques Gaignard ! 


A la prochaine fois, Patrice Bihan. 





























mnt 


Mae 
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COMMUNICATION 










TELEMATIQUE 





EVAION TELEMATIOU 


DU NOUVEAU CHEZ 
LES SYNEISTES. 


Bertrand Beauvais, conseil en 
Tarification Energie, nous 
communique son nouveau service 
télématique mis en place à partir de 
son PCW et du logiciel SYNEA. 


Le service est ouvert de 8h. à 12h. 
le PCW étant utilisé le reste du 
temps pour des tâches plus 
traditionnelles. Il fonctionne par 
abonnement de 350 Frs/an . En avant 
première, nous vous présentons deux 
pages minitel de ce nouveau service 
indiquant les sujets traités et un début 
d'information concernant la facture 
tarif vert. (figures | et 2). 


SUJETS 


THEMES CODE 


ANCIENS TARIFS ACT 
QUESTIONS 
FACTURE AS 
FACTURE AB 


QUE 
FAS 


FACTURE JAUNE 
HORAIRES AS 
HORAIRES A8 
HORAIR JAUNE 


LA FACTURE TARIF VERT A5/A8 
DEUX TYPES DE FACTURES NOUS AVONS TESTE 
Reperables des la lecture de la lére POUR VOUS... 


ligne de la colonne la plus à gauche, 
Soit nous trovons PRÉCISION et nous appe 
Llerons cette facture du te 

Soit nous trouvonsACTIF,KC,P,HP et nous 
considererons cette facture sous À 


Un nouveau service 
pour réserver vos 

FACT TVPE P Precision est un compteur en| Vacances de sport 
registrant de maniere precise les kuh co d'hiver. 


nsommes | 
Réparèiteursérique reparti 
ssantles Xwh consommes Selon les tranche 
$ horaires , 
4 L Mactifismpteur pour | éner 
gie réactive consomaée | 
Enregistreur’consigne les pu 
issances atteintes ;perneltra le calcul d 
es Li 


qu acture 


facture 


Si vous n'avez pas le 
temps de courir 
toutes les agences 
pour trouver la 
formule de séjour 
idéal, vous pouvez 
trouver et réserver 
en quelques minutes 
une location dans la 
station de sport d'hiver de votre choix. 


E : 
Si A.tenvoi 





Figure 2 


Tapez 36.14 code PVTOUR, le 
service télématique de PIERRE et 
VACANCES vous accueille. Vous 
pouvez demander le catalogue ou 
effectuer une recherche de location 
en indiquant les critères : Nom de la 
station, Nombre de personnes, type 
d'appartement. (figure 3). 


TRAITES 


THEMES 


Par Germain DELALANDE 


CODE 


NOUVEAU CONTRAT NCT 


REACTIF COMPENS 
TARIF VERT AS 
TARIF VERT A8 
TARIF JAUNE 
TAXES 

VERSIONS AS 
VERSIONS AB 


EXEMPLE D'ANALYSE TAPEZ EXE 
Retour page précédente RET:B..tenvoi 


PAGE: 5 7 4 


Figure l 
pleinement et à moindre frais ce fabuleux service. 


REA 
VAS 
vas 
JAU 
TAX 
VIA 
VIA 





(figure 5) 


La société GACHOT, autrefois spécialisée dans la 
fabrication de robinets industriels, a pris un virage 
surprenant en investissant dans la T.A.O (Traduction 
Assistée par Ordinateur). Son système, nommé 
SYSTRAN, contient 30 ans de recherche 
linguistiques et informatiques ; il est actuellement le 
seul système d'intelligence artificielle fonctionnant en 


REVOLUTIONNAIRE : 
LA TRADUCTION 
ASSISTEE PAR 
ORDINATEUR. 


Le service télématique 
de la société 
GACHOT, accessible 
à tous par le 36.15 
code MITRAD, met 
son ordinateur (IBM 
4381) et ses logiciels 
de traduction à votre 
disposition. Le PCW, 
transformé en minitel 
grâce à MYNEA, 
permet d'utiliser 


traduction de langues vivantes. 


Comprenant l'impact et la simplicité d'utilisation du 
minitel, GACHOT à mis en place un service minitel 
permettant, sans abonnement, d'exploiter les 


étonnantes facultés de SYSTRAN. 


Pour tester le service, nous avons utilisé le logiciel 
MYNEA très adapté pour ce type de transaction ; 
l'intérêt d'un émulateur de minitel se situe à plusieurs 


niveaux : 


Figure 3 


BONJOUR VOUS ETES CHEZ 
PIERRE ET VACANCES 
Tel:1 47 23 38 & 
HP 
LERE CHAINE LOCATIVE 
FRANCAISE 
55 STATIONS MER MONTAGNE PARIS 
HOPPER 


CET HIVER 
LES 15 EE STATIONS DE SKI 


Le service vous propose une solution FORFAITS 
locative chiffrée que vous pouvez 
instantanément réserver en indiquant 
le numéro de votre carte bleue. 
(figure 4). 


À PRIX 


CONPRIS 


T0 
DES REDUCTIONS, DES ANIMATIONS 


ET LA GARANTIE NEIGE NOËL 
ROBE 
LES SEJOURS BORD DE MER 


UT DOUX 


1 RESERVATION-DOCUNENTATION 


Un service peu onéreux, car sur le 
36.14 (0,37 Fr la minute avant 19h; 
0,26 Fr la minute après 19 h.), qui 
devrait faire plus d’un skieur heureux. 


2 DEMANDE D'UN CATALOGUE 
TAPEZ le No d'OPTION CHOISIE M ENVOI 
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- pouvoir PREPARER 
sous locoscript les 
textes à traduire ; la 
puissance du 
traitement de texte 
permet de présenter 
à SYSTRAN un 
texte sans faute. 


pouvoir, avec 
MYNEA, EN- 
VOYER AUTO- 
MATIQUEMENT 
(sans resaisie) le 
texte créé. Cette 
faculté diminue 
considérablement la 
durée de connexion 


(1 franc la minute sur 
le 36.15). 






PS TS 
EAN 


NI NT 







SES 


CP 


RESIDENCE LOCATIVE 
è DAS 4/5 
Du 191287 Au 261887 


calcules pour 5 Personne(s)) 
SEUL , 


25,00 . 
ANCE  ANNULATION 80,00 X 


paesra PONS de votre eee 5 
€ 01X. 
BLICATÔTRR D'UNR ET UNE seu 
ju 
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Figure 4 

















Figure 5 


LE SERVEUR 


ACHOT S.A 
obinetterie ind. 
Linguistique 









VOUS PROPOSE ... 4 
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s COMMUNICATION | 


- ACCENTUATION : Possibilité d'accentuer le 
texte pour une traduction parfaite car SYSTRAN 
exige que le texte français soit correctement 
accentué et nous connaissons la difficulté à générer les 
accents à partir du clavier du minitel … 


- MEMORISER avec MYNEA les textes traduits. 
Ces textes peuvent être édités sur l'imprimante du 
PCW ou sauvegardés sur disquette pour une 
récupération automatique sous LOCOSCRIPT. Ce 
procédé évite la resaisie et par suite toute erreur de 
frappe (ce qui est appréciable pour une langue 
étrangère). 


UNE UTILISATION MANUELLE... 


Voici comment se présente le service qui démarre par 
une page d'acceuil qui propose un aperçu des services 
offerts. (figure 6). 


Les services de traduction concernent les choix 2 et 6 
pour obtenir respectivement la traduction d’un texte 
ou la consultation des dictionnaires de langue. 


Après avoir formulé le choix 2 (Traduction en 30 






Après saisie du message et avoir indiqué au service la 
nature de la traduction à réaliser (Français — Anglais, 
Espagnol Francais), le service nous fait patienter 30 
secondes, animations graphiques à l'appui, puis nous 
propose la traduction. Il n'y a plus qu'à se servir. 


OU AUTOMATIQUE COM 
Nous avons écrit à partir le 
texte suivant incluant une série 
de commandes permettant de 
consulter le service en 
automatique, et le message à 
traduire. (figure 10 : fichier de 
commandes COM. I) 


CoM.1 
se trouve sur la disquette 
ECHO N°14 





Après avoir tranformé ce fichier LOCOSCRIPT en 
fichier de commandes ASCII (option F7 : Générer 
fichier ASCII) nommé COM.I, nous lançons le 
programme MYNEA ; nous composons le 36.15, 
appuyons sur EXIT à réception de porteuse, 
obtenons la page d'accueil de TELETEL 3, lançons 
par F7 la commande automatique |. À partir de ce 


secondes), le service 
nous demande notre 
nom (éventuellement 
suivi d'un prénom) : 

(figure 7). 


moment, MYNEA prend le relais ; il indique au 
service MITRAD les codes d'accès pour écrire un 
message, envoie le texte et nous rend la main au 
moment de la traduction. 






SON TRADUCTEUR 


1 MODE D'EMPLOI 

& FAITES VOS TRADUCTIONS EN 30 SECONDES 
3 AUTOMATIC TRANSLATION 

4 INFORMATIONS "EXPRESS TRADUCTION" 

5 ECRIVEZ-NOUS 


Le texte français transmis par MYNEA est le 


Par la suite, en 
suivant : (figure 11) 


indiquant ce même 
nom, il sera possible de 
retrouver les textes 
traduits au cours des 
deux semaines 
précédentes. 


Nous avons demandé sa traduction en Anglais et en 
Allemand, ce qui a donné les résultats suivants : 
(figures 12 et 13) 






SKS AUTRES SERVICES 









& DICTIONNAIRES EL£CTRONIQUES 
7 SPORTS (HAND,BASKET, HOCKEY SUR GLACE) 
8 ROBINETTERIE GACHOT 
S FEDERATION FRANCAISE SPORTS DE GLACE 
10 PATINAGE .., BERCY EN DIRECT 


pour revenir à ce menu, faire XSOMMAIRE 
Votre choix D et 


Le résultat est tout à fait surprenant ; le système est 
à la fois souple d'utilisation et rapide (moins de 30 
secondes pour traduire un texte de 12 lignes) ; le seul 
reproche que nous formulerons concerne la longueur 
du texte à traduire, limitée à 12 lignes, imposant de 
découper un texte important en une multitude de 
petits textes. 


La page suivante nous 
demande le nom du 
texte à créer : (figure 8) 







Après saisie du nom du 
texte, le système 
propose une page de 
saisie du message à 
traduire. (figure 9) 








Gageons que ce service d’un genre inédit permettra à 
de nombreuses petites entreprises de préparer avec 





Figure 6 


Figure 7 Figure 8 Figure 9 







Voudriez-vous avoir l'amahi1lité NOM DU TEXTE ECHO 
de bien vouloir vous identifier par 


rapport à notre système © 


NOM TEXTE : x { (6 Car.) puis ENVOI 


REPETITION = liste de vos anciens textes 
GUIDE = consignes de saisie 












TRADUCTIONS POSSIBLES 


FRANÇAIS - ANGLAIS : ANGLAIS - FRANCAIS 
ANGLAIS - AND: ANGLAIS - ITALIEN 
ALLEMAND - ANGLAIS : ALLEMAND- FRANCAIS 
FRANÇAIS - ALLEMAND: ESPAGNOL- ANGLAIS 
FRANCAIS -NEERLANDALS : ANGLAIS -NEERLANDAIS 
ANGLAIS - ESPAGNOL; ANGLAIS - PORTUGAIS 


ATTENTION ... Le FRANCAIS se traduit si 
vous mettez tous les accents, 
our les accents, la touche spéciale 
touche sans inscription) permet : 
- d'écrire en Maguscules. 
.= de mettre Jes accents, 
Maintenez la touche spéciale et tapez ja 
touche avec l'accent, Lèchez tout 
. et frappez la lettre, 





Indiquez votre nom ou un 
(10 caractères maxi) : 


puis faites SUITE 


nee 







Los bib votre prénon ou un 2ème 
pseudonume (8 caractères max1) : 


puis faites ENVOI 


Annuler Ja Jigne en cours  ANNULATION 


Ligne suivante SUITE 

Ligne précédente RETOUR 
de ME A BD 
PE Liste de vos textes SOMMAIRE 






Ceci vous peraettra ultérieurenent de 
retrouver vos textes qui sont conservés 
à SeainT 
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Figure 10 : 
Ress accès au service traduction français-anglais fichier de 

MITRAD+S$ENVOI NOM DU TEXTE MOET3 commande 
COM.I 
ARE hr geehrter Herr, zugestimater Sie 
L . ontrollieren drei rohe | Figure 11 : 
MENRASRINCT Chaspagnerfaelle. Âls zugestinat wir texte 
À werden der Versand Sie gegen français 
MOET+S$ENVOI Rueckerstattung gegorene keine Sie . 

: verlassen sites Zu np Va gi wir Figures 12 
À RNA D MN ÉD bezweifeln kein we getroffene Sie ganz sr 130 
Xonsieur, +$SUITE yuenschen À ane 

Vous avez bien voulu commander trois caisses de champagne brut. Comme L 
convenu, nous vous les expédions contre remboursement. anglaises et 
allemandes 






Vous ne manquerez pas d'apprécier cette cuvée, et nous ne doutons pas 
que vous rencontriez entière satisfaction. 
Veuillez trouver ci-joint la facture correspondante. 


hi Hmuler Ta Tione en cours  ANULATIN 
Same dedoss tin du texte. ===> 22-5222 se re nuler la 1igne en cours 


Li ivante VITE 
igne sui Jr 
| 






















$ 

Ligne précédente RE 
ee : Fin de saisie 
aanipulation 

Ti de 4 textes SOMAA 


f Figure 10 | Figure 11 ! Figure 12 Figure 13 — 


NOM DU TEXTE MOETI NOM DU TEXTE MOET1 ‘ai 


jonsieur, { El agreed to vue sou à { 
e cases. Às agreed, we the CRE à : Fc 
HA Age fut. A des rer against refunding will sérénité le tournant économique constitue par 


convenu, nous vous les expédions not fail you to appreciate this , : 
contre LR hd rite manquerez fernented, and nn de dot fol whon l'ouverture du marché européen en 1992. 
pas d'apprécier cette cuvée, et nous jeu entire met wants to find herewith 

ne doutons pas que vous rencontriez he invoice corresponding. J 23 Ds: 
entière satisfaction.Veuillez trouver Alors ne dites plus minitel rose mais pinky 


minitel ! 






Ïgne en cours nuTer Ta Jigne en cours 
his À Lime suivante SUI Ligne suivante FE 
nas D Ste à 
€ de nanipulation Ç Consignes de nanipulation Ù 
Ti de ve textes soi Liste de vos textes 


NOUVEAU ET GENIAL 1!!! 


L'Invention de l’année 1986 est enfin disponible sur les meilleurs écrans. 
C'est par les mains de Richard PERRY directeur de ROLLS ROYCE 

que le premier prix de 50.000 F a été décerné 

à THINGI comme étant la meilleure 

invention de l'année. 


Pourtant THINGI est d'une extrême simplicité qui n'a d'égal que son 
utilité. Jugez plutôt : Fixé sur le dessus de l'écran, par une bande de 
velcro, THINGI se pose, s'oriente et s'enlève à volonté. THINGI peut 
tenir, sans défaillir, une charge de plus de 500 grammes ou l’équiva- 
lent de 150 pages !!! THINGI libère les bureaux de tout autre support 
encombrant et cher. 


THINGI c'est à gauche ou à droite 
il suffit de le demander ! 

THINCI est le cadeau idéal 

qui étonne et plaît. 





THINGI c'est demain 
chez vous parce que 
c'est aujourd'hui 
chez tous les 


bons revendeurs ; Pour en savoir plus 


de micros. 


appelez la THINGI LINE 
au (1) 48 67 89 54 





L'EVASION TELEMATIQUE + L'ECHO DU PCW N°14 


Ze 


Scanner image 
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aille: Hi À 
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Chen : 1 

Fin: EEN 
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FF 


Lu Leur 
Menu. Fons a 
Sortie vers CF 
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Coprs di gi 





Database’/P PF, 1987 


GARDE A VUE 


POUR IMPRIMANT 


Par Pierre PAND. 


émarrer sur un titre aussi sibyllin est sans 


conteste le meilleur moyen d'attirer votre 
attention sur une nouveauté dont la vocation 
et les performances méritent 
un “regard” attentif. 


Dans la série “Ce mois-ci j'ai testé pour vous le 
nouveau fer à vapeur“, j'avoue avoir attendu 
fébrilement la livraison du MASTER SCAN tant 
cette petite merveille de technologie faisait envie à 
Charly le voyeur... 


Vous avouerez que c'est tentant... Pour quelques 
centaines de francs (une misère vous dis-je !), vous 
prenez votre PLAY BOIS préféré, vous en découpez 
la PLAY GIRL du mois et en un tour de main (je 
deviens scabreux...) la voici entièrement engloutie par 
les neurones du cochon d'ordinateur... 


Ce qui se passe après n'est plus de mon ressort mais 
vous voilà prévenu des risques encourus... PCW 
surexité, disquettes affolées, écran gondolé, c'est vite 
l'affreuse panique que seul une extinction salvatrice ne 
peut que décoinçer.. 


Vous êtes passionnés d'avance. Je peux enfin vous 
révéler le secret des grandioses perspectives d’un si 
petit engin dont je m'en vais vous conter l'histoire. 

















MATERIEL 








PRINCIPE : 


Ethymologiquement parlant, le scanning consiste en un 
balayage à vocation électronique. Dans le cas du jour, 
le scanner sert à la reconnaissance de formes 
imprimées qui seront traduites en signaux électriques 
compréhensibles par l'ordinateur et plus 
particulièrement le PCW. 


Le principe est donc rigoureuseument identique à celui 
du digitaliseur vidéo (cf Echo 12) à quelques 
différences près qui servent à justifier l'originalité du 
scanner. 


La différence majeure vient de la perception même de 
la forme à digitaliser. Pour le digitaliseur vidéo, elle se 
fait d’un seul bloc en un délai quasi instantané alors 
que le scanner procède par étape et plus précisément, 
ligne à ligne, d'où l'emploi du terme balayage. 


L'origine de cette distinction vient du principe de 
capture de l’image. Dans le cas du digitaliseur son 
origine remonte forcément à une caméra vidéo dont 
le coût est important alors que pour le scanner elle 
provient d'un élément capteur intégré, une cellule 
optique, d’un coût bien moindre. 


Déjà, nous pouvons déterminer les avantages et les 
inconvénients de chacun des systèmes pour pouvoir 
mettre en avant ceux du scanner et en déduire ce qui 
vous servira à fixer votre choix. 


FORME ET ORIGINE DE l'IMAGE : 


Le scanner ne peut digitaliser que des images 
imprimées sur un plan et non dans l'espace comme le 
fait le digitaliseur. Donc pas d'image en mouvement, ni 
de connexion vidéo à quoi que ce soit comme nous 
pouvons l'envisager dans le cas du digitaliseur. 


INTERET DU BALAYAGE : 


La tête de lecture du scanner se fixe sur celle de 
l'imprimante et le balayage du document ne peut 
excéder celui de l'imprimante elle-même. Notez que 
cette méthode de fixation est astucieuse mais qu'elle a 
procuré quelques sueurs froides aux concepteurs 
quand ils ont découvert qu'AMSTRAD n'utilisait pas 
toujours les mêmes mécanismes d'imprimantes et que 
la forme des têtes pouvait varier d'un PCW à un 
autre ! Selon POWER PRODUCTS, ce problème est 
maintenant résolu par l'ajout d'un adaptateur universel 
qui devrait plaire à toutes les têtes. Toujours est-il que 
le MASTER-SCAN s'adapte parfaitement à la tête 
standard distinguée par le message “CAUTION 
HOT“ alors qu'il refuse la tête non-standard qui n’a 
que le message HOT (chacun ses têtes me 

direz-vous !). 


Pour insister dans l'aspect matériel du système, voici 
comment il s'organise : 


La tête est donc fixée sur celle de l'imprimante en 
empêchant l'introduction d'une quelconque feuille. Il 
faut donc retirer et remettre sans arrêt la tête du 
scanner pour introduire le document à lire. Autre 
gêne, l'imprimante fait systématiquement un point à 
chaque ligne balayée risquant ainsi de dégrader 
l'original. Seule solution, enlever le ruban afin que le 
point ne s'imprime plus... Que de manipulations. 
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La tête est reliée à une interface qui se fixe sur le 
port d'extension du PCW par l'intermédiaire d’un 
cordon en nappe d'environ 10 cms qui permet de 
mettre l'interface sur le côté afin d'y avoir facilement 
accès pour procéder à un réglage de sensibilité qui se 
fait sur l'interface. Autre particularité utile de 
l'interface : elle permet la connexion d’une interface 
supplémentaire qui peut être une souris, un stylo 
optique, une RS-232, ou autre... 

Enfin reliant interface et tête de lecture, le fil qui, 
trop gros à mon goût, perturbe la lecture en 
provoquant une traction excessive sur la tête et 
génère des défauts de balayage que je n'ai pus 
supprimer qu’en faisant passer le fil par dessus 
l'imprimante afin qu'il accompagne mieux le 
mouvement de la tête. 


LE PROGRAMME SCAN 


Entièrement francisé par son importateur, POWER 
PRODUCTS, le logiciel SCAN est la moëlle 
épinière du système (figure 1). Les options qu'il 
propose détermine les possibilités du scanner et en 
fixe les limites, cela vaut donc que je m'y consacre 
maintenant : 


- SCANNER IMAGE : Lance la procédure de 
scannage. 


- AFFICHER IMAGE : Affiche la dernière image 
scannée. 


- TAILLE : Permet de sélectionner la taille de 
restitution de l’image soit 0,5, 1, 3 et 6. L'avantage 
d’une telle option n'est pas négligeable puisque 
l'original peut être scanné avec une résolution 6 fois 
supérieure qui garantit une restitution beaucoup plus 
fine si le document est ensuite réduit au photocopieur 
ou en photogravure. Pour exemple, le logo de l'Echo 
de la figure 2 a été scanné avec une augmentation de 
la taille de 3. Notez que le scanning ne peut se faire 
en taille | que sur des surfaces d’une dimension 
inférieure à 167 mm de long et 210 de large. Pour 
les documents A4 il faudra procéder en deux fois et 
fusionner les deux parties par l'intermédiaire d’un 
autre programme (voir plus ba MENU FONCTION 
FICHIER pour avoir le détail des programmes 
pouvant effectuer cette délicate mission...) ou scanner 
avec la taille 1/2 qui réduira le document de moitié en 
faisant baisser la qualité de la résolution. 


- COLONNE DE DEBUT/FIN : Réglage de la 
latitude du mouvement de la tête. Utile pour scanner 
des portions de pages et accélerer le processus qui, 
reproche majeur, est extrêmement long : 10 minutes 
pour le logo de la figure 2 (pause café obligatoire !). 


- COULEUR ECRAN : Inversion de la couleur écran 
pour obtenir une meilleure lisibilité de certains détails. 
Cette option n'a aucune incidence sur d'éventuelles 
copies d'écran qui restent résolument inversées par 
rapport à l'écran. 


- MENU FONCTION FICHIER : Donne accès à 
un second menu très utile pour la sauvegarde et 
l'export des images récupérées après scannage. En 
effet, le programme offre la possibilité de choisir le 
format de sauvegarde afin que l’image corresponde à 
celui du programme qui va l'utiliser. Les formats sont 
les suivants : PCW PAINT (MICRO C), FLEET 
STREET (MIRROR SOFT), DTP PAO 
(DATABASE) et NEWSDESK (ELECTRIC 
STUDIO). 


Si la récupération d’une image se passe sans aucun problème 
avec chacun des programmes cités, je constate tout de 
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même que l’inversion 
vidéo persiste et 
qu'elle doit être 
rétablie sous chaque 
programme récep- 
teur pour que le noir 
reste noir et non pas 
que le noir devienne 
blanc. 


Indépendamment de 
ce défaut, le pro- 
gramme est simple à 
manipuler et ne 
devrait poser aucun 
problème notoire. 





Figure 2 : 
LES DOCUMENTS RE 

se scanne 
Pour terminer en tentant de vous donner une information avec un 
complète, je me dois de décrire maintenant le type de > did 


document dont le scanner se satisfera. La tête du de 3 
scanner utilise une petite lampe qui reste (délai 10 
constamment allumée quand le PCW est sous tension minutes). 
{je suppose donc que c’est le PCW qui l’alimente, 
effets à long termes inconnus. Peut-être aurait-il été 
préférable qu'elle s'éteigne quand le scanner est 
inutilisé, usure oblige….). 

Ce préambule pour expliquer le fait que tout papier 
brillant posera d'énormes 
problèmes de lecture. 
Pour les documents quadri 
ou en plusieurs couleurs 
mieux vaut un contraste 
bien net ou une bonne 
photocopie de ceux-ci 
(j'en profite pour vous 
donner un truc méconnu 
mais très utile pour les 
photocopies de documents 
couleur qui consiste à 
intercaler un calque entre 
l'original et la vitre du 
copieur, essayez c'est 
l'adopter !). 

Détail étonnant, le 
scanner n'aime pas le rouge et aurait tendance à 
l'ignorer.. Par contre les autres couleurs restent bien 
perçues quoique le principe même du système n'auto- 
rise guère les nuances comme le fait le digitaliseur. 

Il faut aussi penser au grammage du document à 
scanner. Tracté par l'imprimante, il ne pourra excéder 
180 g sans que cela modifie la fidélité de la restitution. 





Figure 3 


Par conséquent, de nombreux essais seront nécessaires 
avant d’avoir une parfaite maîtrise des possibilités de 
reconnaissance du scanner tant au niveau des couleurs 
que du rendu des contrastes d'un document noir. 


En conclusion, le scanner est un très bon gadget qu'un 
prix défiant toute concurrence rend très attrayant. 
J'avoue que les contraintes des manipulations et du 
temps de lecture d’une image finissent par en 
restreindre l’utilisation au strict nécessaire. La 
compatibilité des images avec les programmes de PAO 


est un point fort du scanner qui FICHE TECHNIQUE 


le rend indispensable à tout 
PAOiste invétéré... Le scanner TYPE : MATERIEL ET LOGICIEL SCANNER 
EDITEUR : DATABASŒE 


n'est certe par un substitut du 
digitaliseur mais un complément IMPORTATEUR : POWER PRODUCTS 
car chacun préserve parfaitement 
son domaine d'activité sans 
empiéter sur celui de l’autre. 
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LOCOSCRIPT 











TOUS NIVEAUX 








LOCOSCRIPT 
FAIT FORTE 


IMPRESSION... 


Par Sylvain BERBIE 


Locoscript est un merveilleux traitement de texte qui, 
bien exploité, peut arriver à produire bien plus qu'un 
simple courrier de réclamation à l'Echo du PCW pour 
ses retards de livraison !!! 
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Comme je sais que cela s'arrange petit à 
petit, il faudra donc employer notre habi- 
tuelle compagnon à des tâches un peu 
moins conventionnelles et néanmoins uti- 
les (ou presque !) 

Voici donc quelques exemples de réalisa- 
tions qui prendront peu de temps à met- 
tre en place mais qui, comme vous pour- 
rez le constater, auront l'avantage de don- 
ner quelques bonnes idées pour d'autres 
réalisations. 


Les fichiers JAQUETTE.00!, JAQUETTE.002, 
JAQUETTE.003, JAQUETTE.004, permettent 
d'imprimer des jaquettes de cassettes audio dans 
différentes dispositions quant aux titres des morceaux, 
d'auteurs et au titre de la cassette. Le choix des dispo- 
sitions est arbitraire, mais les tailles données permettent 
de créer facilement n'importe quel autre modèle. 
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Les titres de cassette sont en gras et pas CI7 (les tabulation droite. Les noms de morceaux et d'auteurs 

doubles ne permettent pas de longs titres !) et les sont identiques au modèle 1. 

noms de morceaux et auteurs sont en indiciel avec un 

interligne de 1/2, ce qui permet de rentrer 14 lignes, Le modèle 3 permet deux titres de cassette 

donc 14 titres, par face. L'intérêt de ce travail réside superposés et centrés, et des titres de morceaux 

surtout dans le calcul de la taille des modèles et des centrés, sans noms d'auteurs (par exemple pour une 

repères qui permettront par la suite, une fois les cassette avec deux disques 33 tours enregistrés sur les 

modèles imprimés, de découper et de plier les deux faces : 2 titres et noms de morceaux). 

jaquettes au cutter. 

J'ai choisi de les imprimer dans le sens que l’on peut Le modèle 4 permet, quant à lui, d'imprimer une 

voir, le titre étant ainsi dans le sens de presque toutes jaquette vierge avec un tableau vide destiné à être 

les cassettes du commerce. rempli à la main. Quelques astuces permettent 
d'imprimer des lignes pleines avec des traits d'union (la 

MODELES fonction ‘‘souligné‘* ne permet pas d'ajuster les lignes 

verticales et horizontales parfaitement). Le titre de la 

Le modèle | permet un seul titre de cassette centré ; cassette à gauche et une référence à droite, justifiée à 

les noms des morceaux sont suivis (ou l'inverse) des droite, permettent la classification. 


noms d'auteurs, l’ensemble en tabulation droite et 


144 
gauche, ‘centré Tous ces modèles peuvent comporter une indication 


gauche et supplémentaire (sous le titre), ici le ©. Par exemple, 
droite en l'origine ou la date et le lieu de l'enregistrement. 


Le modèle 2 permet un titre de cassette 
une référence ou un numéro de cassette 
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MODE D'EMPLOI 


Après avoir lancé LOCOSCRIPT, il . Les fichiers JAQUETTE.001, 
faut créer chaque document et EE 
a demander immédiatement l'affichage des pod ess disquette 
Visualisation des: codes, tabulations, espaces, blancs et ECHO N°14 




























format par le menu obtenu après 
se NATTE pression de la touche <F1> 
LACS (voir figure 1). 
ÉstcEs | Ÿ 
AUTRE UT Les modèles EXEMPLE.001 et 


EXEMPLE.003 correspondent aux 
numéros des jaquettes. Pour créer une 
jaquette, la copier et enlever les numéros de 1 à 14, 
on peut même les enlever sur les modèles. Mais leurs 
présences représentent un risque de moins d'ajouter 
ou d'oublier des lignes (ce qui fausserait le résultat 
imprimé). 





Un conseil utile : laisser tous les signes, codes, est idéal) ou autre, de préférence. Pour réaliser 
tabulateurs, etc apparents, ce qui évitera de supprimer quatre impressions, il faut en placer deux à gauche de 
certains codes qui sont indispensables pour les bonnes la feuille, une au-dessous de l'autre, et ensuite 
dimensions des jaquettes. inverser la feuille et refaire la même opération. 

On peut imprimer quatre jaquettes par feuille de La feuille doit être positionnée ainsi sur l'imprimante : 
format A4 (en théorie il y a la place pour six), sur 

papier Canson (le Lavis technique Canson de 160 g/m? Le bord gauche doit s'aligner exactement sous la 


sixième graduation de la barre presse 


Hieurs 2 papier, pour permettre quatre impressions. 
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LOGICIEL UTILITAIRE 





Cherchant à approcher la perfection, WIGHT SCIENTIST, nous propose SIGNWRITER, un logiciel 
étonnant, fruit de longs mois d’un travail de fourmis. Première particularité notoire, le logiciel est entièrement 
francisé par l'éditeur anglais qui a réalisé la prouesse de proposer une traduction parfaite tant au niveau du 
logiciel que du manuel. Saluons une telle initiative qui ne pourra que satisfaire les utilisateurs ‘monoglotes”. 


SIGENWRITER 


POURQUOI 
FAIRE ? 


SIGNWRITER est un ensemble de quatre logiciels de 
composition destiné à tirer la maximum de résolution 
d’une imprimante matricielle. Dans le cas du PCW 
c'est donc l'imprimante standard qui devient le 
support de l'application. 


Le but ‘du logiciel est de permettre l'impression de 
lettres, signes et chiffres dans des tailles variant de 
quelques millimètres à plusieurs dizaines de centimètres 
avec un choix pouvant s’échelonner de millimètre en 
millimètre. 


La méthode employée par les concepteurs du logiciel 
est très proche de ce que proposent les imprimantes 
laser du plus haut niveau dans la mesure où le 
programme ne travaille plus sur des matrices à points, 
mais sur des vecteurs de façon à obtenir des signes 
extrêmement travaillés sans consommer une place 
démesurée. 


Pour comprendre, prenons la lettre ©. Sur l'écran de 
l'ordinateur, cette lettre est représentée par une 
matrice de 8 sur 8 organisée selon un codage en 
relation avec la taille de la matrice. Si nous devions 
agrandir ce O, il faudrait soit augmenter le nombre de 
points, soit le garder et obtenir une représentation 
très shématisée voir grossière. Cette méthode est 
d’ailleurs employée dans des logiciels tels que graphic 
magic ou DTP-PAO. L'alternative consiste, non plus 
à coder un caractère suivant les points qui le 
constituent, mais suivant la définition mathématique 
des formes qui le caractérisent. 


ENCAUDRE 
Que faire avec SIGNWRITER 


La grandeur des lettrages et la qualité de 
l'impression permettent d'envisager des utilisations 
variées comme : 


- Panneaux de signalisation 

- Banderolles publicitaires 

- Logo de sociétés, en-tête de lettre 

- titrage vidéo, transparent de projecteur 
- Grands titres et lettrines pour l'édition 
- P.A.O 

- Etiquettes pour colis 


Si l’on revient à la lettre O, on peut déduire qu'elle 
est constituée de 4 demi-cercles et de 4 droites. Le 
codage est donc réduit au strict minimum et on laisse 
le soin au programme de déterminer la meilleure 
manière de représenter en quelque échelle que ce soit 
l'ensemble des formes ou vecteurs. 


La finesse maximum n'est donc plus liée au codage du 
caractère, mais à la précision de l'imprimante qui ne 
pourra être plus fine que le plus petit point qu’elle 
puisse imprimer. 





Appuyez sur une touche 


1 - point suivant 

. oint précèdent 
ignes guides on/off 

4 - nouvelles droites 

S - nouveaux arcs 

6 - opérations séquences 

? - voir autres options 

© - fin d'édition 

Fleches - déplacer point 

ES - redessiner 


RETURN - ajouter point 


DEL - ôter point Das 


EXIT - version départ 


Nunéro du caractère 82 








Le curseur est à 80,64 


La représentation vectorielle est donc totalement liée 
à l’algorythme qui va calculer la meilleure 
représentation possible de vecteurs aussi élémentaires 
que ceux qui constituent une lettre ou un symbole 
quelconque. 


Cette méthode de codage et de représentation de 
forme n'est pas une invention récente, bien au 
contraire car de tout temps l’homme a reconstitué 
des formes complexes à partir de formes assez 
primaires et particulièrement dans le dessin de lettres 
que le designer fait naître à partir d’un 
enchevêtrement de cercles, de droites et d’élipses. 


La grande nouveauté vient plutôt de la récupération 
du procédé par l'informatique et surtout pour 
l’utilisation des nouvelles imprimantes laser qui, du fait 
d’une résolution importante (300 points par pouce, un 







Bienvenue Sur $ 

section d'entrée de SIGNHRITER 
(Cort iht Hight Scientific, 1996, 1947) 
(Version Anstrad PCH) 


Donnèes initiales: 


EE courants: 


À 
TT Fichier texte 


Donnèes d'entrèe 


Sens du notif | Horizontal Vertical 
Largeur naxinun |" "Ent cine) Distance en mn 
Position horizontal (ue ne Gauche 
Wotif encadré Oui 
s1are | Autre non 


Non fichier sortie 
Début entrée motif 






























Autres possibilités: 
Fichier s1gn-data 


Début choisi 


Touche flèche pour choisir èlènent à modifier 
Tapez (RETURN) pour enregistrer choix 1liuniné 
ou bien (EXIT) pour commencer l'entrée du motif 


GNWRITER 





LUS SA ere ie re DE 


Figure l : 
Le menu du 
SIGNIN, 
c'est par lui 
que tout 
se joue... 
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BANC D'ESSAI 





pouce = 25,4 mm) ont 
obligé les programmeurs à 
adopter des langages ne 
traitant que des vecteurs. 


Ce petit rappel historique 

permet de prendre 

conscience de la prouesse 

de WIGHT SCIENTIST 

qui a eu la 

modestie d'appli- 

quer à un si petit 

matériel (5 PCW 

pour le prix d'une 
imprimante laser !) une 
technique de programmation 
qui le métamorphose en un 
outil d'impression d’une rare 
qualité. 































SIGNWRITER EN DETAIL 


Livré avec deux polices de caractères utilisables immédiatement, SIGNWRITER inclut 
quatre logiciels de vocations distincies mais 
toutefois complémentaires : 


- SIGNIN est l'éditeur de texte qui 
permet d'organiser un texte ou des figures 
selon des variations que l'utilisateur peut 
déterminer librement. On peut décider 
d'imprimer un texte tapé sur le tas ou de 
récupérer un texte issu d’un fichier 
ASCII. D'autres options de 
présentation concourent 
aussi à faire de SIGNIN une 
aide précieuse pour l'obtention 
d'un résultat digne d’être 
accroché au mur, les voici en vrac : 

(voir encadré 2) 


Pour mieux juger les avantages que procurent 
SIGNIN il faut savoir qu'il inclut un mini- 
éditeur qui, travaillant ligne par ligne, permet de 
changer dans un même écran les caractéristiques 








d'impression citées ci-dessus. 


- SIGNOUT le deuxième programme de la série se charge d'imprimer sur papier les 
textes entrés avec SIGNIN. 





- CAD vient alors en 
complément du précédent 
pour l'entrée des formes à 
créer. Utilisant GSX, ce 
programme est performant 
au niveau des options mais 
redoutable quant à la 
vitesse d'exécution de 
l'éditeur graphique qui est 
assurément le point noir 
tant il est lent et peu 
convivial. C'est assez 
dommage comparativement 
à la simplicité des autres 
programmes, 

mais là encore il a 

une excuse de choix 

en recourant à 

GSX... 
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IMPRIMÉ PAR SIGNWRITER. REPRODUIT EN TAILLE REELLE. 






ELA 





- FONTCALC le petit 
dernier du lot est le 
calculateur qui convertit les 
polices en coordonnées 
exploitables par 
l'imprimante. Son rôle est 
primordial, mais ne fait pas 
intervenir l'utilisateur dans 
la mesure où il ne fait que 
calculer et créer deux 
fichiers dont SIGNIN se 
sert pour imprimer et 
disposer les signes. 








(MENU 1) * lere page 


Sens de l'impression : Horizontal ou vertical 
Hauteur et approche des caractères 


Centrage ou justification de la ligne 
Présence et forme d'un cadre 
Impression normale ou ‘‘noir au blanc“ 





Encadré 2 


ET LES POLICES ? 


Effectivement, les polices de caractères ne manquent 
pas pour SIGNWRITER. Conçues par des sociétés 
indépendantes et spécialisées dans ce travail, elles sont 
répertoriées comme des créations à part entière 
comme peuvent l'être des textes et des programmes. 
Cette information explique le fait que chaque police 
soit vendue séparément à un coût relativement faible 
en Angleterre (environ 50 F par disquette de police). 
Toujours est-il que WIGHT SCIENTIST n'est pas 
encore affirmatif sur le fait de savoir si les polices 
seront vendues regroupées par 5 ou 10 ou 
séparément (FIGURE 2). 





DAWNEFONT QCTOFONT 
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En conclusion, SIGNWRITER est un produit ‘‘haut 
de gamme‘ pour le PCW et les quelques exemples 
qui accompagnent cet article ne le démantiront pas. 
La francisation de l’ensemble, notice, programme et 
polices de caractères, est parfaite et cela vaut qu'on 
insiste. 


La manipulation de ce programme reste accessible à 
tous et ne pose guère de problème de 
compréhension, facilitée en cela par un manuel d'un 
style agréable et clair. Seule remarquable lacune, 
f'éditeur du programme CAD qui, du fait de son 
récours à GSX, est d’une lenteur consternante mais 
est-ce vraiment justice que de juger un logiciel sur un 
de ses défauts ? A voir le résultat on ne peut y 
penser ! 


FICHE TECHNIQUE 


TYPE : LOGICIEL DE COMPOSITION 

EDITEUR : SIGNWRITER 

IMPORTATEUR : DDI 

PRIX PUBLIC : LOGICIEL : 490 F TTC 
POLICES ; NC. 





Même le noir au blanc ne fait pas de difficulté 


(0h ]tE; 


ELEFONT 
Nyon 


themes 
lpnKbhovTt 
HOLEFONT 











Figure 2 : 
Des polices 
tous azimuts 
d'une qualité 
hors du 
commun. 
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INTERVIEW 


LE POLYTECHNICIEN 
suce DES BILLES 


Pris au jeu de l’Astrologie et étonné du succès des nouveaux logiciels 
ASTRO, Jordan Wesson a voulu en savoir plus et nous livre en 
exclusivité son interview complète. 


Jordan Wesson 


Vous êtes diplômé de l'Ecole Polytechnique de Zurich, 
il est rare que des mathématiciens s'intéressent à 
l'Astrologie.. En général, ce sont plutôt des cartésiens 
irréductibles qui ne croient pas à tout ce qui est 
occulte. 

Vous parlez 7 langues et vous avez beaucoup voyagé, 
mais comment êtes-vous venu à L'Astrologie ? 


Etienne Mezo 


J'ai toujours eu, pour habitude, de mettre en équation 
ce qui me passait par la main. Et, bien évidemment, je 
cherchais les choses compliquées. Je suis tombé, un 
jour par hasard, sur un petit fascicule d'Astrologie. et 
c'est ainsi que tout a commençé... Mis à part les 
calculs qui ne sont pas trop difficiles pour un 
“‘matheux", je n'ai d'abord rien compris ! En effet, 
d'un livre à l’autre, on trouve toujours plus ou moins 
les mêmes interprétations, mais pour les mettre en 
application pratique, c'est une autre histoire ! 

Il était impossible, pour le profane que j'étais, de 
cadrer avec précision un événement, ni de lui en 
donner l'importance. 


J'ai alors essayé de jouer à l’Astrologue avec mon 
entourage, mais tombais presque toujours “à côté de 
la plaque“ ! Puis les œuvres de CG. Jung, m'ont mis 
sur la voie. Vous savez … Carl Gustav, l'assistant de 
Freud ! C'est l’un des fondateurs de la psychanalyse. Il 
a établi les rapports entre le mouvement des planètes 
et le comportement psychologique des gens. 


J'ai mis des années à comprendre que l'Astrologie allait 
beaucoup plus loin que le simple oracle. En effet, il est 
impensable, même les plus cartésiens l’admettront, que 
le macrocosme de l'univers bouge et que nous, 
microcosme, restions indifférents ! 


Depuis plus de 15 ans, j'ai côtoyé diverses civilisations 
qui m'ont permis d'étudier des cultures et d'apprécier 
des mentalités très différentes des nôtres. J'ai constaté 
que chaque personne disposait d'un potentiel d'action 
ou de réaction, d'émission ou de réception vis à vis 
d'une situation donnée... et que ceci s'expliquait par 
le mouvement sidéral ! 


Les détracteurs de l'Astrologie me parleront du libre- 
arbitre ! En effet, chacun peut décider de son chemin, 
mais il s'avère que le moment de cette décision n'est 
pas le simple fait du hasard ! 


J. W. 
On dit qu'au Pôle Nord, il n'y a pas d'Ascendant ! 


XX 


E. M. 


Le calcul de l'Ascendant se fait par la trigonométrie. 
Au Pôle Nord les valeurs deviennent soit nulles, soit 
infinies, soit égales à |... 


La raison pour laquelle on ne peut pas le calculer est 
simple : 

au Pôle Nord, il n’y a rien, c'est donc le zéro... et on 
n'a rien d'autre à y faire qu’à regarder l'infini ! C'est 
beau l'infini ! Et puis l'infini vous permet de retrouver 
l'unité ! Vous savez... dans toutes les religions, dans 
toutes les philosophies du monde, l'unité c'est 
soi-même ! 


1. W. 


Faut-il donc être philosophe pour être astrologue ? 


E. M. 


Sans doute mais il faut d’abord être psychologue ! 


J. W. 


Qu'entendez-vous par aider son prochain ? 


E. M. 


L'Astrologie a été trop galvaudée en dépit du bon 
sens ! C'est un formidable outil pour permettre à 
chacun d'expliquer ses aptitudes et ses attitudes, à se 
connaître soi-même. On dit que les astres proposent 
et l’homme dispose ! C'est vrai, mais pour cela il faut 
que l'homme sache avec quoi il peut disposer. 


Souvent un astrologue ou une voyante découvrent des 
potentiels d'évènements à plus ou moins brève 
échéance. Je pense que la combinaison de l'Astrologie 
et d’une science divinatoire comme par exemple les 
Tarots peuvent réellement cerner à la fois la date et le 
détail de l'évènement. Mais il faut éviter de troubler, 
voire de heurter un consultant trop influençable par 
une prédiction. Le dialogue est indispensable car, par 
définition, le consultant est inquiet, sinon il ne 
consulterait pas les astres. Il faut donc d'abord lui 
expliquer que ce sont ses propres vibrations qui 
détermineront son avenir. || aura les moyens de le 
maîtriser s’il en connaît l'amplitude et la fréquence. 


Prenons un exemple : 


Un passage de Saturne sur un point clé d’un thème 
natal comme l'Ascendant signifiera un frein, une 
intériorisation, peut-être une épreuve. Mais dès que 
l'on parle de Saturne, appelé traditionnellement “la 
Grande Maléfique", tout le monde s’affole ! Les 
notions de Bien et de Mal étant relatives et des 
habitudes définies par l'Homme. A lui de savoir 
comment transformer ce Mal“ en “Bien. Tout 
simplement en ‘grandissant ! 
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A la naissance, nous sommes comme une petite bille 
projetée sur un plan horizontal. Cette bille va suivre 
une trajectoire plus ou moins compliquée, c’est le 
chemin de vie. Puis devant la bille, se trouve un mur, 
c'est-à-dire une épreuve. Et c’est à ce moment-là que 
tout se joue ! Soit la bille heurte le mur et rebondit 
mal ou s'arrête, soit on a réussi par son esprit à créer 
une légère courbure en bas du mur afin que la bille 
puisse prendre la tangente et s'élever ! On appelle 
cela une transformation d'énergie cinétique en énergie 
potentielle ; Le mouvement change de dimension ! 


J. W. 


Comment avez-vous eu l'idée de créer ce logiciel et 
pourquoi sur Amstrad ? 


E. M. 


Amstrad ! C'est le hasard, parce que j'avais un PCW 
8512 ! En réalité cela fait des années que je voulais 
offrir un logiciel simple et accessible au grand public 
sans négliger pour autant les professionnels. Il existe 
des tas d'ordinateurs de poche qui dessinent des belles 
cartes du Ciel et alignent des chiffres et des symboles 
incompréhensibles. Par contre, si l’on veut une 
interprétation valable, il n'y a rien de sérieux sur le 
marché. 

Je dois d’ailleurs vous faire une remarque sur votre 
précédent article : L'interprétation du thème de 
naissance n’est pas d’une page, mais de 3 ! 
L'exactitude de cette interprétation varie entre 80 et 
90% sur toutes les personnes analysées. 


J. W. 


Oui c'est vraiment étonnant ! En fait, j'ai cherché à 
tout savoir et j'ai obtenu un total de plus de 8 pages 
de texte pour l'étude de ma personalité, de mon 
avenir pour l'année 1988 et de mes relations avec ma 
fiançée. Sur 10 années de prévisions, cela fait 30 
pages en plus ! C'est fantastique ! 


E. M. 


Il y a une chance sur plusieurs milliards pour que 2 
textes soient parfaitement identiques. Ceci prouve 
bien que chacun est unique ! Pour avoir exactement le 
même texte sur deux personnes il faut que leur date 
de naissance et que l'heure universelle de naissance 
(GMT ou TU) soient à quelques minutes près la 
même. 


J. W. 


Avez-vous eu des difficultés à écrire le programme sur 
Amstrad ? 
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E. M. 


L'Amstrad PCW est une merveille de petite 
machine... mais son mode d'emploi est 
«redoutablement mal fait !.. Je ne suis pas le seul à le 
dire ! Un ami informaticien sur IBM m'a dit qu'il 
fallait être déjà bien branché pour tout comprendre. 
Je vous avouerais qu’il y a encore des tas de choses 
que la machine doit pouvoir faire et qui ne sont 
expliquées nulle part. Quant au manuel du PC, n'en 
parlons pas, c’est carrément scandaleux ! 


La plus grande des difficultés à été de ‘‘gratter‘‘ des 
octets. En effet le PCW ne laisse en basic qu'à peine 
plus de 31 k. Au début, le programme en faisait plus 
de 200 ! (sans les fichiers d'interprétation), c'est-à-dire 
plus de 6 sous-programmes avec l'instruction 
“CHAIN MERGE" sur le drive B avec une disquette 
en double-densité ! 


Pendant 6 mois, j'ai fait la chasse aux octets et 
aujourd’hui je ne crois pas que l’on puisse beaucoup 
mieux faire ! C'est un furieux mélange de BASIC et 
d’Assembleur ! 


1. W. 


Comment vous situez-vous par rapport aux divers 
services astrologiques proposés dans les grandes 
surfaces ? 


E. M. 
Il y a quelques temps, j'ai pris une option pour 
représenter une société suisse. Mais les négociations 
n'ont pas abouti. Cette société dispose d'excellents 
logiciels, (6 Méga de textes) et des interprétations 
‘’musclées‘* de 10 à 20 pages de texte, mais les 
conditions de reprise des droits de licence étaient à 
mon avis exorbitantes. Un jour, sur un coup de tête, 
parce que je ne supportais plus la suffisance de mes 
interlocuteurs qui prétendaient avoir découvert l'Oeuf 
de Colomb, j'ai décidé de tout programmer moi- 
même ! Et croyez-moi, ce ne fut pas une sinécure : 
plus de 2000 heures de travail. Aujourd’hui, je 
pourrais écrire des milliers de pages en mémoire afin 
d'obtenir des analyses de personnalité très complètes. 
Il suffit que les mémoires soient assez grandes. 

Mais pour répondre à votre question, je ne me 
‘‘situe‘* pas par rapport aux puissantes machines 
disposant de plusieurs mégaoctets de mémoire, parce 
que je permets à chacun de devenir astrologue.. Faire 
son thème à la maison, sans se déplacer, ni attendre 
que le Minitel vous réponde, c’est quand même un 
service que personne n'a proposé jusqu'ici. 
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Mais vous n'avez pas autant de texte que ces ‘grosses 
machines“ ! 


E. M. 


Il y a beaucoup de grosses machines qui disent que 
vous êtes beau, intelligent et gentil. en 10 pages ! 


Les pages concentrées du logiciel suffisent largement. 
Je crois que les profanes se moquent de savoir si la 
Lune est en sextile avec Mercure et que l'entrée de 
Jupiter et de Venus dans la maison 5 peut leur faire 
rencontrer l'amour de leur vie ! Il suffit de le dire 
sans périphrases ! 

La mémoire de l’ Amstrad est limitée. Le total de la 
Version Ill représente environ 300 k (2 faces presque 
pleines). Une Version ASTRO SOFT sera bientôt 
commercialisée pour permettre à chacun de 
programmer sa propre interprétation en fonction des 
planètes en signe, en maison et en aspect. On pourra 
alors faire en quelques jours ce qui m'a pris des 
années. Cette Version comprendra 2 disquettes : la 
Version III et la version SOFT. Et si l'utilisateur en a 
le courage, il pourra rentrer des centaines de pages 
de texte sur plusieurs disquettes. 


JL W. 


La société LOGI'STICK distribue vos produits. 
Comment l'avez-vous trouvée ? 


E. M. 


Par le plus pur des hasards. J'ai acheté la revue 
l'ECHO DU PCW, parce que le mode d'emploi de 
l'Amstrad est vraiment effroyable, et l'ECHO du 
PCW est un excellent moyen pour comprendre ce 
qui n’est expliqué nulle part ailleurs. N'ayant pas les 
fonctions DRAW, MOVE et CIRCLE pour le 
graphisme, je suis tombé sur le logiciel EXBASIC qui 
m'a permis de terminer en peu de temps les Cartes 


du Ciel. 

J. W. 

Il y a des centaines de demandes en quelques 
semaines, pourquoi ce succès ? 


E. M. 

Imaginez que quelqu'un puisse en peu de temps 
devenir astrologue, voire psychologue et même les 
deux. Il existe des centaines de milliers de personnes 
en France plus où moins intéressées à l’Astrologie. 
Savoir l'avenir et connaître les autres, c’est quand 
même formidable, non ? La plupart de ces personnes 
s'arrêtent bien vite, car le décryptage est très 
complexe. En créant le Partenaire Astral, j'ai voulu 
permettre à tout le monde d’entrer par la grande 
porte. 

Finis les calculs rébarbatifs et les explications à n’en 
plus finir : chacun peut visualiser sa propre carte du 
ciel et son interprétation. En effet, dans tous les livres 
du commerce, on trouve des tas d’études sur les 
personalités politiques, les célébrités, mais sur soi- 
même... Rien ! Et qu'y a-t-il de plus agréable 
d'entendre enfin quelqu'un parler de soi ! 


Au fur et à mesure de l'expérience, l'utilisateur 
pourra lire tout seul une carte du ciel et 
l'interprétation ne lui servira plus qu’à titre de point 
de repère. 























Je pense que ce logiciel a la qualité essentielle de 
démystifier l’'Astrologie en la rendant accessible à tous. 


J. W. 


Mais vous allez faire une terrible concurrence aux 
grosses machines ? 


E. M. 


Vous savez bien que maintenant les petites machines 
remplacent les grosses, c'est l'avenir ! C'est vrai que 
ce logiciel est vite amorti ! Prenez par exemple une 
étude faite par un service spécialisé : il vous en 
coûtera environ 100 F pour une étude de caractère, 
la même chose pour les prévisions pour un an et 
encore |50 à 180 F pour l'étude de couple. Cela fait 
donc près de 400 F pour analyser complètement une 
personne. Au bout de 5 personnes, vous avez amorti 


l'investissement de la version Ill, et la version | en 
vous étudiant seulement vous-même ! 
Faites-vous des consultations ? 


Seulement si je suis en affinité astrale avec le 
consultant. Je dois vous avouer que le logiciel me 
facilite beaucoup la tâche. Il me suffit de lire le texte 
pour faire un portrait d'une personne que je n'ai pas 
encore rencontrée. Il suffit ensuite de regarder la 
carte du ciel pour moduler telle ou telle phrase. 

Mais le travail le plus important est le conseil de 
recrutement dans l’industrie parce que souvent on 
commet l'erreur de mettre ensemble des gens qui 
n'ont aucune affinité. Cela fait considérablement 
baisser le rendement. On fait souvent appel à la 
graphologie qui est une science précise, mais qui a le 
défaut de ne pas indiquer les moments critiques. Et 
puis il faut des heures... Ici nous parlons en secondes ! 


Jordan Wesson 
Pourquoi ce nom de ‘‘PARTENAIRE ASTRAL" 


Etienne Mezo 


Les relations humaines m'ont toujours passionné. Au 
fil du temps et à force d'observations, j'ai constaté 
qu'il y avait une étonnante corrélation entre les 
positions planétaires et les affinités ou les répulsions 
entre les gens. Pour l'instant ce nom signifie que le 
logiciel est un partenaire pour chacun l'aidant à mieux 
se connaître et découvrir son prochain. 

En réalité le Partenaire Astral, c'est autre chose... 
c'est le partenaire idéal... Vous savez le 

prince charmant ou la jolie fée que 

chacun recherche. Mais c’est une autre 

histoire. Je vous promets des surprises 

pour bientôt ! 


REPORTAGE + L'ECHO DU PCW N°14 


Les disquettes thématiques de l'Echo reprennent tous les 
programmes depuis le numéro 1. Bénéficiant des dernières 
améliorations chaque disquette est livrée avec son manuel. 









GESCALC GESTION DE = POKER FOLIES 
INVESTISSEMENT Ê PACS STOCK En AGENDA 
PATRIMOINE ATHEMYS MUSIC MACHINE 
BUSINESS SUPER GRAPHE MATHELEM 
PERT EVALUATION LOTO 
DEMO : AZERTY T.A.O. OTHELLO 
DEMO : TASWORD DEMO : AZERTY 
ETIQUETTES DBASE AUTO- GSX.BAS 
ea MULTIPLA.KEY M PROGRAMMATION GSXDAO 
RE PO: STANDARD KEY Œ A PTUI GAG ET SETKEYS T.A.O. 
DBASE.KEY PRINTER MAKER LES PLUS D’EXBASIC 
PROG1.CMD, PROG.CMD MONITEUR DE DISC SUPER GRAPHE 
MENU.CMD MATRIX DEMO : GRAPHIC 
DEMO : AZERTY LOCASC2 MAGIC 





TABLEAUX ASCII 
DEMO : GRAPHIC 
MAGIC 


Disponible chez votre revendeur habituel, vous pouvez aussi vous les procurer par correspondance à LOGI'STICK 
CAPN Le Bonaparte - Boîte 49 - 93153 LE BLANC MESNIL Cédex 




















Mme. Melle. M. - Nom : ; Prénom : 

Adresse : 

Code Postal : __________ Ville: Pays : 
Commande par la présente les références suivantes : | | | | 


au prix unitaire de 100*F TTC ou de 500*F pour les six références 

réglé par L] CHEQUE _] MANDAT [ ] ccP Signature : 

LIvISA caen LTTITIIIIIITIIIIIT 
LL] 














ATTENTION ce bon de commande tient lieu de facture. 
Conservez-en un en double pour votre comptabilité. 


(*) : FRANCE FRANCO DE PORT ET D'EMBALLAGE TVA 18.6% incluse de 15,68 
ETRANGER OÙ DOM-TOM AJOUTER 7 F PAR DISQUETTE dans le prix TTC par disquette 


VOTEZ POUR LUI ! 


Notez chacun des articles que vous avez lu et retournez ce questionnaire à 
L'ECHO. Chaque mois, l’auteur dont l'article a obtenu la meilleure moyenne 
se verra attribuer une prime de 1000 F et le lecteur tiré au sort recevra un 
magnifique cadeau-surprise. 


Date d'expiration : 





ARTICLE PAGE PASLU TRES MAUVAIS MAUVAIS MOYEN BON TRES BON NOTES 
NEWS E si Ü .... /20 
INITIATION A DBASE (XII) | 3 CU .... /20 
L'EVASION TELEMATIQUE C .... /20 
ESSAI SCANNER C ; s E 4420 
LOCOSCRIPT LE] C C] mu À + 120 
ESSAI SIGNWRITER C C C 16.534120 
REPORTAGE sl a] E C 260120 


INITIATION BASIC (3) 7 ji n no NOTEZ BIEN 
INTERACTIF C [ D 20 NOTEZ MAL 


DU NOUVEAU SUR LE CLAVIER C 1 C : es 120 MAIS 
BUDGET FAMILIAL 


CARTE BLANCHE A VNCENT LEDOS - 1 D 0 VOT E Z 











































































































Nom : Age : 








Adresse : 











Code postal : ______ Profession : 
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ARRETER LE TAPAGE NOCTURNE 


Reposez-vous, offrez à votre PCW les disquettes de l'Echo du PCW. Saisis 
avec amour et testés avec passion, les programmes qui les composent sont 
ceux du numéro correspondant... Alors contre l'usure prématurée du 
clavier. une seule solution : Commandez-les ! 


ATTENTION DESORDRE... 


Le numéro d'Avril est introuvable ? Celui de Juin froissé ? 
Comment pouvez-vous supportez cela ? Vous ne pouvez plus, alors d'Echo vous le dit... 
C'est la reliure qu'il vous faut ! Prévue pour classer une année complète soit onze numé- 
ros, elle garantit la longévité de votre collection et vous fera gagner un précieux temps en 
recherche et en classement... 


LE CHAINON MANQUANT... 


L'Echo du PCW est le mensuel des PCWistes et depuis son premier numéro de nombreux 

sujets essentiels ont été abordés. L'information qui vous manque est probablement dans l’un 
d'entre eux. Alors ne cherchez plus vainement et complétez, sans attendre votre collection 
avec les sommaires des anciens numéros (N°1, 2, 3 et 6 sont au bord de l'épuisement...) 


es 
e4 
= 
— 
a 
e4 





Melle/Mme/M./Sté/Ass*-Nom : #27 - 
BON Adresse : mn 


DE Code Postal : 


CODEN ne — 
* rayer la mention inutile 


COMMANDE PAR LA PRESENTE 













































































JOURNAL L'ECHO DU PCW (TVA 7%) e Nota : la TVA est incluse dans le prix TTC 
Dee x ABONNEMENT DE ONZE NUMEROS A COMPTER DU NUMERO [15] SOIT …… x 290 (France) ho ET RTE 07) 
7. x ABONNEMENT DE ONZE NUMEROS À COMPTER DU NUMERO [15] SOIT …… x 450 (Etranger et Dom-Tom) = ..........F (TVA=29,44) 
ANCIENS NUMEROS[113/4[5/6[7[8[9hNofh1f12n13 SOIT …… x 30 (France) 2 dat F (TVA= 1,96) 
ANCIENS NUMEROS[113141516[7[8[9fN0oh1f1213 SOIT …… x 40 (Etranger et Dom-Tom) = .......... F (TVA= 2,62 
DISQUETTES ECHO DU PCW (TVA 18,6%) ne Nota : la TVA est incluse dans le prix TTC 
it x ABONNEMENTS DE ONZE DISQUETTES A COMPTER DU NUMERO [15] SOIT …… x 690 (France) =... f (TVA= 108,21) 
pet x ABONNEMENTS DE ONZE DISQUETTES A COMPTER DU NUMERO [15] SOIT …… x 900 (Etranger et Dom-Tom) = .........F (TVA=141,15) 
DISQUETTES : 1[2]3[4[5[6[7]8[9hofh1f121314 som x 80 (France) An a F (TVA= 12,55) 
DISQUETTES : 1[213[4[5[6[7]8[9hof1]1218l4 sor … x 95 (Etranger et Dom-Tom) = ........ F (TVA= 14,90) 
RELIURE ECHO DU PCW (TVA 18,6%) Fa Nota : la TVA est incluse dans le prix TTC 
mr x RELIURE DE CLASSEMENT ANNUEL (CONTIENT 11 NUMEROS] SOIT …… x 80 (France) a PL) 
ne x RELIURE DE CLASSEMENT ANNUEL (CONTIENT 11 NUMEROS) SOIT …… x 95 (Etranger et Dom-Tom) = ..........F (TVA=14,90) 
Soit un TOTAL TTC. [de ........ F 
REGLEMENT A L'ORDRE DE LOGI'STICK PAR Nutnéretée le Cène 








CRMANDAT ET :cHEouE Cl ecr Cl VieACaRTE: steve CEE EE TETE 


Date d'expiration l l 








Tous ces prix sont nets Etranger : Réglement sur le montant hors-TVA par mandat international, Signature obligatoire : 
et incluent le port et Eurochèque [avec le numéro de la cartel ou carte VISA. Les taxes sur (celle des tuteurs 
! ; la valeur ajoutée seront réglées aux postiers en vertu des dispositions pour nos lecteurs mineurs) 
l'emballage 

fiscales dans le pays destinataire et ce, sur la base du total hors-taxe 
en francs français 


ATTENTION, CE BON DE COMMANDE TIENT LIEU DE FACTURE. 
CONSERVEZ-EN UN DOUBLE POUR VOTRE COMPTABILITE. 


A RETOURNER A L'ECHO DU PCW - LOGI'STICK Edition 
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Le N°10 est enfin réimprimé et disponible. Le N°2 est épuisé. 


NÉS 


S 
Q SPECIAL SPECIAL 
LIGHT PEN ECRAN 
N MCOMMENT CHOISIR B BASIC : 
SA COMPTA {|} COMPATIBILITE CPC/PCW 
M LES CONFIDENCES DE BB DBASEI : INITIATION (1) 
LOCOSCRIPT M COMMENT CHOISIR SA 
BASIC : GSX - UN DEPART COMPTABILITÉ {111} 


M LES CONFIDENCES DE LOCOSCRIPT 
M LANGAGE MACHINE INITIATION (11) 
B DOSSIER : L'ECRAN 


SAISISSANT 
M PROGRAMME : POKER FOLIES 
M REPORTAGE: AMSTRAD SHOW 
ESSAIS : LIGHT PEN - 3D CLOCK CHESS M PROGRAMME : INVESTISSEMENT - AGENDA 


BIORYTHMES - LIVRE JETSAM - AZERTY M ESSAIS : LA SOURIS - TOMAHAWK - ROTATE 
| _ = à EXBASIC ET LES LIVRES DE MULTIPLAN 








Tous les programmes du numéro 3 


Tous les programmes du numéro 1 sont sur la disquette 1 
sont sur la disquette 3 


+ Une démonstration gratuite d'AZERTY 


SPECIAL SPECIAL 
MUSIQUE PLUS 
o M DBASEI : MESSAI : SPOOL 
INITIATION (Ii!) M DBASE || : LES PLUS 


INITIATION (IV) 
MCP/M: LES PLUS - DELUGE 
ASCII {1} 
M LOCOSCRIPT: LES CONFIDENCES 
LES PLUS 
M REPORTAGE: AMSTRAD SHOW 
M L'EVASION TELEMATIQUE 
M PROGRAMMES: GESTION DE STOCK - DAO ET GSX 
| Tous les programmes du numéro 6 sont sur la 
4 disquette 6 + Une démonstration gratuite de 


TASWORD 8000 


M CP/M : SETLST 
M TELEMATIQUE : L'EMULATION 
MINITEL 
M LES CONFIDENCES DE LOCOSCRIPT 
M PROGRAMME : MUSIC MACHINE 
BUSINESS 
MESSAI : COMPAGNON - MX550 - STRIKE FORCE 
HARRIER - PCW10 


È Tous les programmes du numéro 5 
— sont sur la disquette 5 






SPECIAL 
JEUX 


SPECIAL 
SOMMAIRE 


M DBASEI : 
INITIATION (VII) 
MLES AVEUX DE MME 
LACAILLE {1} 
M LIVRE : FICHIER SUR AMSTRAD 
M DELUGE ASCII (IV): RPED 
LES CONFIDENCES DE LOCOSCRIPT 
M L'EVASION TELEMATIQUE 
M PROGRAMMES : MATHELEM 
MESSAI: GRAPHIC MAGIC - JOYSTICK 


Tous les programmes du numéro 9 sont sur la 
disquette 9 + Une démonstration gratuite de 
GRAPHIC MAGIC 


M ESSAI : MEMENTO 
BILAN PLUS 
BB DBASEI : INITIATION (VI) 
M CP/M : TOUS LES LIVRES 
M ANCIENS SOMMAIRES 
THEMATIQUES 
M L'EVASION TELEMATIQUE 
BLES CONFIDENCES DE LOCOSCRIPT 
M DELUGE ASCII (NI) : MULTIPLAN 
M PROGRAMMES : GESCALC 


È Tous les programmes du numéro 8 sont sur la dis- 
= guette 8 + Un programme inédit et gratuit ! 


Q SPECIAL SPECIAL 
PROGRAMMES PAO 


/ ESSAI ; TURBO 
/ EXPERT BASE 
/ M DBASE |! : INITIATION (IX) 


BB L'EVASION TELEMATIQUE 
M DEMARRER EN CP/M 
M LOCOSCRIPT LE SECRET DES PAGES 
M INITIATION A L'INTELLIGENCE 
ARTIFICIELLE 
M PROGRAMMES : MONITEUR DE DISC, LOGOGRAF 
MLOTO, STICKER-MAKER, T.A.O. 


Ë Tous les programmes du numéro 11 
= sont sur la disquette 11 
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BESSAI : DTP-PAO 
VIDI MX-990, ASTRO 

M INITIATION À CP/M (2) 

M INITIATION À DBASE [X) 

M INITIATION AU BASIC (1) 
M INTRODUCTION À LA PAO 
M PROGRAMMES : INVEST +, 

VERIFICATEUR B-12, QUIZZ, LOGOTRAM 


Tous les programmes du numéro 12 
sont sur la disquette 12 


SPECIAL 
DBASE 


M BASEI : INITIATION (1) 
LES LIVRES DE DBASE 
LES TRUCS DE DBASE 
M DES CADEAUX POUR PCW 
M TRANSFORMER UN PCW 
EN SERVEUR MINITEL 
M LES CONFIDENCES DE LOCOSCRIPT 
M PROGRAMME : MATRIX - PATRIMOINE 
ESSAIS : TASWORD 8000 - MEDIACOMPTA 
MX330 - CLEF POUR PCW 


Tous les programmes du numéro 4 
sont sur la disquette 4 





SPECIAL 
COMPTA 


M ESSAI : MAILING 
M DBASEI : LES LIVRES 
INITIATION (V) 
M COMMENT CHOISIR SA 
COMPTABILITÉ (IV) 
M L'EVASION TELEMATIQUE 
M DELUGE ASCII (11) 
M LES CONFIDENCES DE LOCOSCRIPT 
M LES BONS PLANS DE MULTIPLAN 
M PROGRAMMES : PRINTER MAKER 3 - UNE COMPTA 
| Tous les programmes du numéro 7 sont sur la 
= disquette 7 + Une démonstration gratuite de 


TASWORD 8000 


SPECIAL 
TELECOM- 
MUNICATION 
M DBASEI : 
INITIATION (VI) 
M COMMUNICATION : 
L'UNIVERS TELEMATIQUE - LES 
LIVRES - RS232 
BI L'EVASION TELEMATIQUE 
M DIVERS: DECOUPE BANDES - PCW VECU 
BB CP/M: TOUT SUR LE CLAVIER 
M PROGRAMMES: PERT - RS/MAKER - OTHELLO 
MBESSAIS: MODEM OLITEC - CALVACOM - MAIL232 


Tous les programmes du numéro 10 
sont sur la disquette 10 


SPECIAL 
SALON 


ESSAI : DRIVE 5 1/4 

SOURIS KEMPSTON 

M INITIATION BASIC (3) 
M INITIATION DBASE (XI) 
M L'EVASION TELEMATIQUE 
M REPORTAGE : AMSTRAD EXPO - 
PCW SHOW - BELGIQUE 
M PROGRAMME : LE JEU DE LA VIE 
TRIFICH - GESCALC2 - INVEST2 


Tous les programmes du numéro 13 
sont sur la disquette 13 








ENFIN UN CLUB ! 


POUR TOUS LES PASSIONNES 
QUI VEULENT TIRER LE MAXIMUM 
DE LEUR MACHINE 


Démarrant ses activités le 1° Décembre 
1986, le CLUB ECHO DU PCW sera l'indis- 
pensable complément du magazine. 


Les remises accordées par les revendeurs 
« club » ainsi que les logiciels donnés par le 
club doivent permettrent d’amortir très rapi- 
dement le coût de l'inscription. 


Un bulletin mensuel servira de liaison entre 
les adhérents et comprendra toutes les infor- 
mations à caractère urgent (nouveauté, expo- 
sition) mais aussi l'adresse des revendeurs 
« Club » mise à jour, des programmes inédits, 
des trucs et astuces impubliables (par rapport 
à la quantité} ainsi que des informations 
techniques. 


CE QUE VOUS OFFRE LE CLUB 
Dès réception de votre inscription, nous vous 
ferons parvenir 
- Votre carte personnelle d’adhérent 


- Votre code d'accès à votre boîte aux lettres 
personnelle sur le serveur ECHO 


- Un tableur qui est en train de révolutionner 
l'Angleterre est offert par MML aux adhé- 
rents du club (valeur 450 F) 


- La liste des revendeurs « club » de toute la 
France chez qui vous obtiendrez les meilleu- 
res remises. 


TOUTE L'ANNEE 


- Vous recevrez régulièrement votre bulletin 
de liaison. 


- Vous pourrez participer aux stages organi- 
sés par l'Echo du PCW selon des conditions 
très avantageuses. 


- Vous pourrez utiliser et consulter en toute 
liberté votre boîte aux lettres personnelle sur 
le serveur de l’Echo. 


- Etre invité personnellement à toutes les réu- 
nions ou exposition organisées par l’Echo du 
PCW. 


Pour faire partie des privilégiés du PCW, 
n'attendez-pas, inscrivez-vous pour une 
année au CLUB DE L'ECHO DU PCW et 
retourner le bon ci-dessous à : 
CLUB ECHO DU PCW, LOGI'STICK Edition 
CAPN Le Bonaparte, Boîte 49 
93153 Le Blanc Mesnil Cédex 





PE - 


/ 


J'adhère pour une année à compter du / / 





au club de l'ECHO DU PCW 














NOM : __ PRENOM : _ AGE ES — 
ADRESSE : _ 

VILLE : CODE POSTAL : 
TEL: PROFESSION : 





Tarif pour une année : France 350 F - Etranger 495 F 





Signature obligatoire : 


Etudiants et chômeurs : France 290 F - Etranger, DOM-TOM 390 F 
(Accompagnez votre inscription du justificatif) 


Règlement par [] Chèque ou C1 Mandat à L'ECHO DU PCW 





LR Ne: Ze 


3° épisode 


par PATRICE BIHAN 


ous étions restés le 
mois dernier sur quelques problèmes. Je suppose que 
vous les avez parfaitement résolus, et c'est donc à 
titre purement indicatif que je vous livre la solution. 


On ne dira jamais assez qu'il faut programmer en 
toute rigueur et c'est pourquoi je proposais la 
méthode suivante : 
| - Recherche des variables connues 
Attribution d’un nom (identificateur) et de sa 
valeur numérique 
2 - Recherche des variables de contenu inconnu 
a priori (c'est-à-dire susceptibles de changer) 
2.1 Recherche de variables simples 
Attribution d’un nom 
2.2 Recherche de variables issues d’un calcul 
Attribution d’un nom et de la formule de 
calcul, 
Mise en ordre logique des formules 
trouvées. 
3 - Affichage des résultats 








Considérons maintenant les quatre problèmes 
proposés dans notre précédent article. 


- Premier problème : la surface du trapèze : 


La formule donnant la surface est la suivante : 


SURFACE = PETIT COTE + GRAND COTE / 2 # HAUTEUR 


Si l'on désire analyser et mettre en forme 
informatique ce court problème à la lumière de 
l'algorithme précédent, cela nous donne la recherche 
ordonnée suivante : 


| - Recherche des variables connues 


Aucune variable n'est connue. Disons tout de suite 
que le nombre 2 est une valeur constante, connue 
valeur constante, connue en tant que telle du 
système, et qu'il n’est donc pas nécessaire de lui 
indiquer, par exemple sous la forme : N = 2, puis 
utiliser N dans la suite des calculs. De nombreux 
débutants le font ; cela n’est bien sûr pas faux, 
simplement inutile. 


- Attribution d'un nom (identificateur) et de sa valeur 
numérique 
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DEBUTANT 


BASIC 





Comme il 
de variables 


donc pas de Le 


ner. 


2. Recherche 
de contenu inconnu a priori 
(c'est-à-dire susceptibles de changer) 





nom à don- 


des variables 


2.1 Recherche de variables simples 
Attribution d’un nom 


Il y a trois variables simples : 

PETIT COTE, GRAND COTE et HAUTEUR, 
que nous allons appeler en Basic PC, GC et H, par 
exemple. Nous aurions pu dire Petit Côté, ou 
Hauteur simplement. Pour aller plus vite dans 
l'écriture du programme, nous utiliserons quelques 
lettres. En fait, il n’est pas inutile, quand on fait un 
programme complexe de nommer clairement les 
variables, ou du moins d'utiliser des ‘’mnémoniques* 
faciles à comprendre. Par exemple, PC symbolise bien 
PETIT COTE, plutôt que X123 où TYUA (qui 


fonctionneraient tout aussi bien par ailleurs !). 


2.2 Recherche de variables issues d’un calcul 
Il y en a une, la surface, que l'on va nommer S. 
Attribution d'un nom et de la formule de calcul, 


S = (PC + GC)/2*H 


Mise en ordre logique des formules trouvées. 
C'est vite fait ici ! 
3. Affichage des résultats 


Si l'on reprend l'ensemble, on écrit donc le 
programme suivant : 


10 INPUT ‘’Entrez le petit côté ‘’; PC 
20 INPUT ‘’Entrez le grand côté ‘’; GC 
30 INPUT ‘’Entrez la hauteur ‘’: H 


AUS = TECH EC)I2 EH 
50 PRINT ‘’La surface est = /’;S 


Second problème : le calcul de la surface du triangle 
équilatéral. 
La formule donnant la surface est la suivante : 






DURE le) E-7 Ne 








En sachant que le calcul d'une racine est donné par la 
fonction prédéfinie SQR (de square root, racine 
carrée). Qu'est-ce qu’une fonction en Basic ? C'est 
une instruction possédant un ou plusieurs arguments 
renvoyant implicitement un résultat. Par exemple, la 
fonction SQR sert à donner la racine d’un nombre, 
lequel est donné en argument de la façon suivante : 





Ici, 3 est le nombre dont on veut calculer la racine, et 
ce nombre est l'argument de la fonction SQR, et 
donc placé entre parenthèses obligatoirement. Dans 
notre exemple, nous disons explicitement que la 
variable RACINE est égale à la racine de 3, mais 
nous aurions pu également utiliser SQR(3) 
directement, comme nous allons le faire dans la 
formule de calcul. Le simple fait de déclarer SQR(3) 
dans cette formule provoque de la part du Basic le 
calcul de cette racine, et la substitution du résultat 
obtenu dans la formule. Par ailleurs, si le Basic 
possède un certain nombre de fonctions éminemment 
utiles, le programmeur peut également créer ses 
propres fonctions. Nous le verrons ultérieurement. 


Voyons le programme. 


U 
1. Recherche des variables connues 


Aucune variable n'est connue. Ici encore, il eût été 
possible de déclarer RACINE = SQR(3), puis 
d'utiliser RACINE dans la formule suivante. En fait, 
comme nous le disions, il est plus simple de mettre la 
fonction directement dans le programme. 


2. Recherche des variables de contenu inconnu a 
priori (c’est-à-dire susceptibles de changer) 


2.1 Recherche de variables simples 
Attribution d’un nom 


Il y en a une, COTE, que l’on va nommer C, par 
pure paresse ! 


2.2 Recherche de variables issues d’un calcul 
Il y en a une, la surface, que l’on va nommer S. 
Attribution d’un nom et de la formule de calcul, 





Mise en ordre logique des formules trouvées. 


3. Affichage des résultats 
Programme : 


10 INPUT ‘’Entrez le coté ‘’; C 


20 S = (C2) / 4 * SQR(3) 
30 PRINT ‘’Surface = ’’;S 





On notera que l'élévation à la puissance se fait avec 
l'accent circonflexe ; on aurait pu tout aussi bien 
énoncer : C*C. 














- Troisième programme : la surface du pentagone. 







Point n'est besoin ici d'aller à Washington pour 
calculer cette surface, donnée par la formule : 


un 


1. Recherche des variables connues 
Aucune. 


2. Recherche des variables de contenu inconnu 
a priori (c'est-à-dire susceptibles de changer) 


2.1 Recherche de variables simples 


Attribution d’un nom 


Il y en a une, le rayon, : nommons le R. 


2.2 Recherche de variables issues d’un calcul 


Il y en a une, la surface, que l’on va nommer S. 


Attribution d'un nom et de la formule de calcul, 





Mise en ordre logique des formules trouvées. 


3. Affichage des résultats 


Programme : 


10 INPUT ‘’Entrez le rayon ‘’; R 
20 S = 5/8*R "2*SQR(10 +2 * SQR(S5)) 
30 PRINT ‘’ Surface = ‘’; S 





- Quatrième programme : la surface de l'ellipse. 
La formule de calcul nous était donnée ainsi: 





Et voici l'analyse : 


| - Recherche des variables connues 


Il y a une, c'est PI, dont on sait depuis longtemps 
qu'elle vaut 3,1416. On peut donc énoncer ici : 


Une question se pose peut-être : pourquoi déclarer PI 
alors que précédemment, nous disions qu'il n’était pas 
nécessaire de déclarer N = 2, ou encore RACINE 
= SQR(3). En fait, on peut aisément comprendre 
que PI est une valeur particulière (de nombreuses 
calculatrices et d’autres Basic l'intègrent en général 
comme valeur connue), susceptible d'être utilisée 
plusieurs fois dans le programme. Ce n'est pas le cas 
de celui-ci, car très court, mais le cas peut 
évidemment se produire. Si on l'utilise plusieurs fois, 
mieux vaut alors la déclarer au départ une fois pour 
toutes, et utiliser ensuite dans l'écriture du 
programme PI plutôt que 3.1416. 
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2 .Recherche des variables de contenu inconnu 
a priori (c’est-à-dire susceptibles de changer) 


2.1 Recherche de variables simples 
Attribution d’un nom 


Il y en a deux, Grand diamètre, nommée ici GD, et 
petit diamètre, PD ! 


2.2 Recherche de variables issues d’un calcul 


Il y en a une, la surface, que l'on va nommer S. 


S = PI/4 * GD * PD 


Attribution d'un nom et de la formule de calcul, 


Mise en ordre logique des formules trouvées. 


3. Affichage des résultats 


Programme : 


10 PI = 3.1416 
20 INPUT ‘‘Entrez le petit diamètre ‘’; PD 
30 INPUT ‘’Entrez le grand diamètre ‘’; GD 


40 S = PI / 4 * GD * PD 
50 PRINT ‘’ Surface 





Pour bien assimiler ce que nous venons de voir, nous 
ne pouvons qu'inviter le lecteur à faire ses propres 
programmes, en calculant des volumes, ou en faisant 
des calculs à partir d'opérations courantes, par 
exemple : 


Volume d’une sphère = 4/3 * PI * R 3 


ou 

Capital final = capital initial * ( | + taux) " années 
dans le cas du calcul d'intérêts composés. 

Il faut insister ici sur un point capital, généralement 
négligé par les débutants : il faut toujours revérifier à 
la main les résultats donnés par un programme en le 
testant sur plusieurs exemples, ceci afin d'être sûr de 
sa validité. N'oubliez pas un aspect important des 
variables en Basic, lequel est à mon avis un défaut : si 
l'on oublie de déclarer une variable, cette dernière 
vaut automatiquement 0 si on l'utilise. Prenons 
l'exemple suivant : 












Si l'on veut programmer ces deux formules (n'y 
cherchez pas un sens !) et ainsi calculer la valeur de B, 
nous dirons en Basic : 


= 12 
208 = A +5 
30 PRINT ‘’ Valeur de B = ‘’:B 





Imaginons maintenant que, en entrant le programme, 
on oublie la ligne 10, ce qui donne le programme 
suivant : 


20B=A+5 





30 PRINT ‘’ Valeur de B = ’’:B 


Si on exécute le programme, l'écran affichera 
“Valeur de B = 5“, simplement parce que, lors du 
calcul A+5, A n'avait pas de valeur déclarée et a 
donc la valeur 0 par défaut. Cela peut sembler trivial ; 
néanmoins, dans un programme de plusieurs centaines 
de lignes, une telle erreur peut passer inaperçue, car 
0 est après tout une valeur comme une autre : un 
résultat généré par une telle formule peut 
parfaitement sembler viable si cette dernière se trouve 
parmi 50 autres. Surtout, n'imaginez pas que le 
système va générer un message d'erreur, car il n'y a 
pas d'erreur au sens habituel du terme en Basic, par 
exemple une erreur de syntaxe. On peut parfaitement 
énoncer qu'une variable comme B peut être égale à 
0+5, même si cela a peu d'intérêt. On peut 
éventuellement détecter l'erreur si le nombre résultat 
semble curieux : par exemple, si la formule 
précédente multiplie au lieu d'additionner, on trouvera 
nécessairement que B vaut 0, ce qui pourra attirer 
l'attention : 


20B=A*S5 


30 PRINT ‘’ Valeur de B = ‘’;:B 





En revanche, un message d'erreur délivré par le Basic 
apparaîtra dans le cas suivant : 


20B=5/A 


30 PRINT ‘’ Valeur de B = ‘’;:B 





Comme A vaut 0, et que l’on ne peut diviser un 
nombre par 0, une erreur explicitement affichée sera 
générée. Alors seulement on peut détecter l'erreur, 
laquelle ne résidera pas réellement en ligne 20, qui est 
parfaitement correcte du point de vue syntaxique, 
mais dans la ligne (absente) numéro 10. Soyez 
vigilants ! 
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INITIATION BASIC 





Les mots pour le dire 


Nous allons étudier maintenant un nouvel aspect du 
Basic, celui qui permet d'utiliser des mots. Par 
exemple, nous avons déjà remarqué l'usage 


‘ 


d'expressions telles que ‘‘ Surface ‘* . Si l’on désire 
écrire sur l'écran cette expression, il suffit de dire : 





PRINT “Surface “ 


Eventuellement suivi d'autres arguments. Pourquoi 
mettre entre guillemets cette expression ? On se 
doute que le système doit faire la différence entre le 
mot Surface et la variable Surface. Cette différence 
réside dans le fait que, énoncé entre guillemets, le 
Basic comprend qu'il a affaire à un ou plusieurs mots, 
à afficher tels quels, mais sans les guillemets, qui n’ont 
qu'un rôle de délimiteurs, justement, alors que dans le 
second, par exemple 


LULU ETS 


I comprend avoir affaire à une simple variable : et il 
va donc afficher, non pas le mot Surface, mais son 
équivalent numérique. Du coup se pose la question : 
comment mettre en mémoire des mots, plus 
précisément nommés en informatique des chaînes de 
caractères alphanumériques ? 


Il faut pour cela simplement indiquer au Basic que telle 
variable sera de type alphanumérique, et il suffit 
d'ajouter, à la suite du nom, le signe dollar, $, comme 
ceci : 


NOMS = ‘ BIHAN “ 


Dans cet exemple, nous avons créé une variable 
alphanumérique, de nom NOMS, et de valeur (!) 

“ BIHAN “. Maintenant, si l'on désire utiliser 
l'expression “ BIHAN “, pour l'afficher par exemple, 
il suffira de dire : 


PRINT NOMS 


en lieu et place de 

PRINT ‘“ BIHAN ‘“. Cela peut sembler sans intérêt, 
mais prend un autre aspect si l'on comprend que les 
variables alphanumériques sont identiques, hors les 
calculs arithmétiques évidemment, aux variables 
numériques. Expliquons-nous. 








Nous avons défini au préalable les variables numériques 
faites de deux types : 


- Celles dont le contenu est connu au départ, et à 
priori non changeantes, 


- Celles dont le contenu n'est pas connu au départ, ou 
a priori susceptibles de changer. 


Nous avons exactement les mêmes en type 
alphanumérique. Prenons l'exemple d'une entreprise 
qui fait ses bulletins de salaires. Ces derniers sont 
composés de valeurs numériques, le salaire de base, 
les retenues, le net à payer par exemple, et de 
valeurs alphanumériques, le nom du salarié, son 
adresse, etc. On se doute que sur tous les bulletins de 
salaire de cette société, il va y avoir des valeurs 
communes et des valeurs différentes. Par exemple, le 
nom de la société est commune sur tous les bulletins : 
c'est une valeur alphanumérique constante ; en 
revanche, le nom du salarié est par définition 
changeant d'un bulletin à l'autre : c’est une valeur 
alphanumérique également, mais changeante. 
Comment se comportent de telles variables 
alphanumériques ? De la même manière que les autres. 
Par exemple, si l’on désire déclarer au début du 
programme que le nom de la société est ‘* SOCIETE 
TRUC, 24 Rue des Acacias 06000 Nice‘‘, nous 
pouvons énoncer : 


SOCS = ‘ SOCIETE TRUC, 24 Rue des 
LXETEUAUUANIESS 





Nous avons ainsi créé une variable SOCS, symbolisant 
l'adresse de l'entreprise. 


Par ailleurs, si nous désirons entrer le nom du salarié 
dans le programme de manière dynamique, c'est-à-dire 
en cours d'exécution, nous énoncerons : 





INPUT ‘ Entrez le nom du salarié “; SALARIES 


Ici, le salarié est changeant, et, à chaque bulletin de 
salaire, il sera nécessaire d'entrer son nom. 


De toutes les matières, 
c'est les Watts qu'il préfère 


Pour illustrer ce qui précède, je vous propose de 
résoudre, pour la prochaine fois, le problème suivant. 


Comment programmer une facture simplifiée EDF ? 
Le programme devra demander le nom et l'adresse 
d'un client et sa consommation en électricité Heures 
pleines et Heures creuses, puis afficher chaque coût, 
le total Hors taxes et toutes taxes : 


- Coût Kilowatt/Heure pleine = 0.6 

- Coût Kilowatt/Heure Creuse = 0.3 

- TVA = 18.6 

- Adresse EDF = “| rue Ampère 08200 Sedan“ 
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Et voilà pour aujourd'hui. 
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cours complet de dactylographie 
pour la maîtrise du clavier Azerty 


une méthode unique 
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Mettez toutes les chances de votre côté avec AZERTY 


c'est un logiciel LOG/'STICK distribué par D.D.I. 
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Interactif est la rubrique mensuelle qui informe 
et explique tout ce qui se passe entre l'Echo 
et ses lecteurs. 


OUZ 


AUTEURS 
ROCHE 
B | HAN 
TEAM 
DEL AL ANDE 
TEAM 
TEAM 
PEL 


Les votes, les errata, les informations et les 
éclaircissements trouvent dans ce rendez-vous 
mensuel une place privilégiée. 


En résumé, les Echoïstes branchés lisent INTERACTIF ! !! 


DE 


HER I ON 


ERP IN 


H 
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S 
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SI 
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PATRICE 
ECHO °S 
ARC 


Gl 


MAR: 


ENCORE LUI ! 


C'est sans l'ombre d'une hésitation que vous avez élu Olivier COQUIN pour sa 
magistrale interprétation de ‘‘il était une fois le clavier infernal..." 


RANGS 
DE 


ALAN 


Le 


PAPIER PERSONNALISE EN CONTINU 


Comme nous le proposions dans les précédents numéros, le papier à en-tête en continu 
est toujours disponible par notre intermédiaire. Pour ne plus immobiliser les deux pages 
que la présentation de ce service nécessite, il fait désormais partie du service entreprise. 
De plus, d'autres types de papier ont été ajoutés et les prix ont même baissé ! 


TEURS 


ETER MAC 


Liste des papiers disponibles: Bulletins de paye, factures, avec ou sans traite, traites etc. 


F 


LE SERVICE ENTREPRISE RECRUTE... 


Le succès des demandes d'inscriptions au service entreprise est immense et nous permet 
de prendre conscience du fait que la place réservée au PCW dans les PME, PMI et chez 
de nombreux professionnels est loin d'être négligeable. 


HI STOGRAMMES 


COQUIN ET 


Par conséquent, les développeurs et sociétés de services ont par cet intermédiaire, une 
occasion unique de proposer des développements spécifiques. 


Il'est flagrant que la communication passe mal entre les demandeurs et les développeurs 
et qu'il faut y remédier. C'est la vocation de ce service et les personnes succeptibles de 
participer devraient être un peu plus locaces sur les services qu'elles proposent. 
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VERIFICATEUR SUITE... 


Conformément à nos remarques du numéro précédent le vérificateur B-12 vient de subir 
un lifting qui fera rapidement oublier ses erreurs de jeunesse. Saluons le travail de Vincent 
LEDOS qui trouve une juste place dans un ‘‘One man show‘ de haute volée (cf CARTE 

BLANCHE A VINCENT LEDOS, même numéro). 


ENFIN LE 10! 


Comme convenu, le numéro 10 qui était épuisé vient d'être retiré et sa commande ne 
pose plus de problème. Par contre, c'est au tour de l'Echo N°2 dont la vente est 
maintenant suspendue sans autre avis pour le moment. 


Par contre les disquettes de chaque numéro restent disponibles même si le journal est lui- 
même épuisé. 


SALON : SHIFT EXTRA EXIT... 


Pour finir en fanfare, remercions les nombreux lecteurs venus nous rendre visite lors 
d'AMSTRAD EXPO dont nous saluons l'organisation qui restera un modèle du genre. 
Notez que les visiteurs étrangers venus prendre la température du marché français ont 
été particulièrement étonnés de la taille et de la qualité d'ensemble de cette exposition 
jugée très professionnelle. 
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L'autre sujet d'étonnement pour les visiteurs britanniques et germaniques a été de 
constater que les utilisateurs français vivent plus intensément leur rapport avec 
l'informatique et que le phénomène de mode passagère que connaissent les anglais ne 
nous touche pas. En somme, en France on possède un ordinateur pour s'en servir. 
Logique ne croyez-vous pas ? 
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EUR 
PRO 


SPE 


Sur cet heureux constat plein d'un sage enseignement, je vous laisse savourer le présent 
numéro. 
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Notamment, après désassemblage de 
SETKEYS.COM (eh ! oui ! quelle rude nuit), il est 
apparu que SETKEYS acceptait plusieurs syntaxes 
pour une même définition, et autorisait l'utilisation de 
mnémoniques dont certains sont plus parlants qu’un 
simple code ASCII en hexadécimal. Par ailleurs, une 
erreur (nos amis d'outre-Manche auraient dit un bug) 
s'est glissée malencontreusement dans le programme 
SETKEYS.COM fourni par AMSTRAD. Rassurez- 
vous, elle ne devrait pas vous avoir gêné dans le 
passé. Mais après la lecture de ces lignes, on ne sait 
jamais. 


STRUCTURE DES FICHIERS 
DE REDEFINITION 


Un fichier de redéfinition de clavier se compose de 
deux types de lignes : les instructions de définition de 
touches et les définitions d'extensions (optionnelles). 
Ces deux sortes de lignes peuvent se trouver dans un 
ordre quelconque dans le fichier et même être 
alternées. Le non-respect de la syntaxe du fichier 
entraîne une erreur non fatale, c’est-à-dire que le 
reste du fichier est correctement interprété. La ligne 
erronée s'affiche, accompagnée d’une injure en 
anglais. Les lignes vides sont ignorées sans erreur, ce 
qui permet d’aérer la présentation du fichier. 


1. Les instructions de définition 
de touches. 


Ces instructions font correspondre à une touche 
donnée, éventuellement associée à une ou plusieurs 
touches de contrôle (SHIFT, ALT, EXTRA), soit 
un caractère unique, soit le code d'invalidation de 
touche 159 (ou #9F en hexadécimal), soit un code 
intermédiaire correspondant à une extension de 
plusieurs caractères. Le code intermédiaire doit 
prendre une des valeurs réservées : 128 à 158 (#80 à 
#9E en hexadécimal). 


CLAVIER PCW + L'ECHO DU PCW N°14 


AVIER DU PCW. 


Par TONY LUZY 



















Une ligne de définition doit comporter quatre champs, 
séparés par au moins un espace ou un caractère de 
tabulation : 


1.1. Le champ numéro de 
touche. 


Les touches étant numérotées de 0 à 80, le champ 
numéro peut être écrit en décimal, c'est-à-dire en 
clair de 0 à 80, ou en hexadécimal à condition d'être 
précédé d’un dièze (#00 à #50). Les numéros de 
touches en décimal figurent sur le schéma du Livre I 
d’Amstrad (2° partie, page 102). On évitera 
toutefois de redéfinir les touches dites de contrôle : 
<ALT> (80 ou #50), <SHIFT> (21 ou #15), 
<SHIFT><LOCK> (70 ou #46) et <EXTRA2 (74 
ou #4A), ainsi que la touche <PTR> (9 ou #9). 


1.2. Le champ contrôle. 


Ce champ décrit les combinaisons actives de la touche 
avec les touches de contrôle. || comporte un ou 
plusieurs symboles, dans un ordre quelconque, 
obligatoirement séparés par un espace. Ces symboles 
sont S, A, SA, E ou N (en majuscules ou en 
minuscules) correspondant respectivement à 
<SHIFT>, <ALT>, <SHIFT>+<ALT»”, 
<EXTRA2 ou rien du tout (normal). Si plusieurs 
symboles se suivent, la définition s'applique à toutes 
les combinaisons. 


1.3. Le champ ‘’caractère’’ 
ou ‘‘’token‘’’ 


Ce token, encadré de guillemets, affecte à la touche 
un caractère unique, le code d'invalidation 159 ou un 
code intermédiaire d'extension choisi 
parmi les valeurs réservées 128 à 158. 
Plusieurs modes de représentations sont 
possibles : 


Les fichiers de 


de cet article 
se trouvent sur la disquette 
ECHO N°14 


- un caractère dit ‘‘imprimable‘* de code 
ASCII compris entre 32 et 126. Il 
s'agit des lettres AÀ...Z, a...z, é, à, ç, 
à, à, des chiffres 0.9, des signes de 
ponctuation et de l'espace. Ce 
caractère, entré directement au 
clavier, doit figurer seul entre 
guillemets. 


exemple 














exemple 
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- un guillemet où une flèche-en-haut. Le caractère doit 
alors être précédé d’une flèche-en-haut. 


un caractère de contrôle de code ASCII inférieur à 
32, ainsi que le code 127 (#7F). Il se représente par 
une flèche-en-haut suivie, soit d'une lettre, soit d'un 
mnémonique en majuscules ou en minuscules encadré 
d'apostrophes. Les séquences flèche + lettre et les 
mnémoniques sont représentés avec leur signification 
sur le tableau [. || est plus sympatique d'écrire 
<esc> ou <del> que *’#1B’ ou "#7F. 


dans tous les cas, le caractère peut être représenté 
par son code ASCII. C'est d'ailleurs la seule 
méthode applicable à un code intermédiaire 
d'extension (de valeur 128 à 158 ou #80 à #9E), 
au code d'inactivation de touche (159 ou #9F) et 
au jeu de caractères supplémentaires (160 à 255 ou 
# A0 à #FF : voir pages 109 à 111 du manuel 
bleu). Le nombre représentant le code ASCII (en 
décimal ou en hexadécimal précédé d'un dièze - 
mêmes règles que pour le champ numéro de touche) 
est introduit par une flèche-en-haut et encadré 
d'apostrophes. 


On notera que le guillemet et l'apostrophe fermants 
peuvent être omis sans génération d'erreur. 












1.4. Le champ commentaire 


Il s'agit d'une zone libre et optionnelle. Les lignes qui 
précèdent montrent des exemples de commentaires. 
Cette zone doit être séparée du champ token par au 
moins un blanc ou une tabulation. Mais un long 
commentaire ne doit pas être coupé par un retour 
chariot, qui engendrerait une ligne invalide, donc un 
message d'erreur. 


2. Les définitions d'extensions 


Les extensions permettent d'affecter à une touche ou 
à une combinaison de touches une chaîne de plusieurs 
caractères, par exemple une commande comme 
‘“‘setkeys dbase.key“ ou une séquence fréquemment 
utilisée dans une application de gestion, comme, au 
hasard, “Logi’Stick <return> 93153 <return> Le 
Blanc-Mesnil <return>“. 


Les définitions d'extensions sont optionnelles : un 
fichier peut fort bien ne pas comporter d'extensions. 


Une définition d'extension devrait normalement 
correspondre à un code intermédiaire présent dans le 
champ token d’une instruction de redéfinition du 
même fichier, mais ce n'est pas obligatoire. 


Une définition d'extension non liée à une définition de 
code intermédiaire n'engendre pas d'erreur à 
l'exécution de SETKEYS, pas plus qu'un code 
intermédiaire sans définition d'extension 
correspondant. 


Le seul risque est un comportement inattendu de 
certaines touches, car les définitions préexistantes ne 
sont effacées que par une nouvelle définition des 
extensions ou une nouvelle affectation des codes 
intermédiaires. 


Lorsqu'elles existent, les définitions d'extension 
peuvent se trouver n'importe où dans le fichier, avant 
ou après l'instruction de définition de touche 
correspondante. 


Pour des raisons de présentation du fichier, on peut 
choisir de réunir les instructions d'affectation de 
touches et les définitions d'extensions en deux blocs 
distincts. 


On peut aussi décider de faire suivre l'affectation de 
touche de la définition d'extension correspondante. 
Affaire de goût... 


Une ligne de définition d'extension doit comporter 
deux champs séparés par un espace ou une 
tabulation : 


2.1. Le champ numéro de 
code intermédiaire. 


Il commence par la lettre E (ou e) immédiatement 
suivie du numéro de code en décimal ou en 
hexadécimal (mêmes conventions que pour le champ 
numéro de touche). 
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2.2. Le champ chaîne de 
caractères. 


La chaîne doit être encadrée de guillemets. Chaque 
caractère doit suivre les règles énoncées 
précédemment pour le champ token. Il peut être 
représenté par le caractère lui-même. Une flèche-en- 
haut annonce soit un code numérique ou un 
mnémonique entouré d'apostrophes, soit un caractère 
de contrôle, soit une autre flèche-en-haut ou un 
guillemet. Le guillemet final peut seul être omis. 


Exemple : 

Soit à faire générer par la touche f7 la séquence 
75010 <retour chariot Paris <retour chariot>. À 
la touche f7, on a déjà affecté le code intermédiaire 
128 ou #80 (voir Ple Pis 


Ens “7s01ONM Pari" : 





sont des définitions équivalentes et valides. À vous de 
choisir. 





Attention ! Il existe une limite au nombre de 
caractères admissible pour l'ensemble des extensions. 
Cette limite peut varier selon les versions de CP/M, 
mais elle se situe aux alentours de 100 caractères. Les 
définitions qui entraîneraient un dépassement de cette 
limite ne sont pas prises en compte, mais il n'y a pas 
de message d'erreur. Penser aux extensions 
préexistantes qui comptent dans ce total. Il est bon 
d'effacer les extensions inutilisées en leur affectant 
une chaîne vide, avant les définitions de chaînes plus 
longues (ici, l’ordre des définitions est important). 





QUELQUES ASTUCES 


Génération de certains 
caractères graphiques 


Il s'agit des caractères servant à la construction de 
tableaux (barres horizontales ou verticales, simples ou 
doubles, coins, etc). Ces caractères sont représentés 
avec leurs codes ASCII respectifs sur le tableau HE. 
On voit que ces codes sont compris entre 128 et 
159, qui sont les valeurs réservées des codes 
intermédiaires. 


La seule solution possible est de définir ces caractères 
en deux temps avec un code intermédiaire (égal ou 
non au code ASCII du caractère à générer, peu 
importe), comme pour une chaîne de plusieurs 
caractères. 
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22E “#'#90’“ extra = — double trait horizontal 
E#90 ‘1138’ 


63 E “t’092’“* extra X — croix à double trait 
E#92 “1#8F'“ 


L'intérêt est immédiat. Dans la saisie d'un programme 
BASF, il est as Pipes de taper : 





2. Quelques aménagements 
utiles du clavier standard 


A titre d'exemple, la configuration d'origine du clavier 
sous CP/M présente quelques imperfections lors de 
l'utilisation du pavé numérique. En effet lors de la 
saisie de longues séries de chiffres, il faut lâcher la 
touche <EXTRA> pour que la touche <-DEL> 
fonctionne. Sinon, gare à celui qui regarde davantage 
son clavier que son écran. De même, la virgule avec 
<EXTRA2 rend un point d'interrogation inversé, 
fort apprécié de l'autre côté des Pyrénées, mais pas 
du goût de BASIC qui manifeste sa mauvaise humeur 
par un ‘‘Syntax error‘. Redéfinissons ces deux 
combinaisons de touches par ces deux lignes que vous 
pouvez ajouter à l’aide de votre éditeur préféré au 
fichier <STANDARD.KEY> : 


72 e “‘t'del”“ voir paragraphe “correction de 
setkeys“ 
38 e se 


3. Quel éditeur utiliser ? 


Calculons la taille maximum d'un fichier de 
redéfinition. Au pire, si l'on redéfinissait tout le 
clavier, le fichier comporterait 80 lignes d'une 
cinquantaine de caractères y compris les 
commentaires, auxquels s'ajouteraient 30 lignes 
d'extensions occupant en tout (soyons large) 300 
caractères. Soit un total de 110 lignes pour une taille 
globale de l'ordre de 4000 caractères, autrement dit 
4 kilo-octets au grand maximum. 


Ici, pas d'hésitation, il s'agit de petits fichiers, c'est 
RPED (sous BASIC) qui s'impose. Notons que 
RPED n'accepte pas le caractère de tabulation. Mais 
l'espace fait très bien l'affaire comme séparateur de 
champs. Rappelons aussi que le caractère flèche-en- 
haut s'obtient en appuyant sur la touche ‘accent 
circonflexe‘* 


En revanche, LOCOSCRIPT n'est pas adapté à 
l'édition de fichiers de redéfinition de clavier, car, 
outre sa lourdeur de manipulation (changer de 
disquette, booter LOCOSCRIPT, créer un fichier 
ASCII, revenir à CP/M), il présente un gros 
inconvénient : la flèche-en-haur et les caractères 
accentués bien de chez nous prennent une allure 
bizarre de retour sous CP/M. 


Un dernier conseil pour gagner du temps, faites une 
photocopie du schéma de la page 102 du manuel 
AMSTRAD, ainsi que des tableaux pages 106 à 111 
et accrochez-les bien en évidence devant votre table 
de travail. 
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CONCLUSION 


Vous voilà désormais armé pour créer vos propres 
fichiers de redéfinition de clavier. Mais les propos qui 
précèdent vous paraissent peut-être encore trop 
ésotériques. Rassurez-vous. Une surpise vous attend 
dans un prochain numéro. Laissez-moi soulever un 
coin du voile. Il s'agit d'un programme BASIC (avec 
un peu de langage machine. Désolé, on ne peut pas 
faire autrement). Ce programme permettra la 
création d’un fichier de redéfinition en appuyant sur la 
touche à redéfinir, puis en introduisant le caractère ou 
la chaîne de caractères correspondant. Merveilleux, 
n'est-ce-pas ? 


TABLEAU 1. CARACTERES DE CONTROLE 


mnémo- 


n 


‘NUL 
’SOH' 
"STX' 
'ETX' 
"EOT' 
"ENQ' 
’ACK' 
‘BEL’ 
’BS' 
'HT! 
LF' 
IVT' 
FF’ 
’CR' 
SO" 
1S[' 
‘DLE'’ 
‘DCI’ 
’XON’ 
’DC2’ 
’DC3’ 
’XOFF' 
’DC4’ 
‘NAK' 
'SYN’ 
"ETB’ 
"CAN 
’EM' 
SUB’ 
"ESC" 
’FS' 
1GS' 
1RS' 
’US' 
1SP! 
"DEL" 








code code | signification 
hexa | décimal | la plus courante 
































TABLEAU 2. 
CODES ASCII 
DES CARACTERES GRAPHIQUES 





Lancer BASIC CARGRAPH puis hardcopy par 
EXTRA.PTR 











#00! ‘à, ou caractère nul CORRECTION D'’UNE ERREUR 

/ / 

#0 'A DANS ‘’SETKEYS.COM'’. 

#03 1C Le bug se situe au niveau du code ASCII affecté au 

#04! mnémonique “DEL. 

#05 Le code inscrit dans le programme est #FF (255), 

#06! alors qu'il devrait être #7F (127). Pour 

#07! bip, ou détruit car en avant effectuer la correction, copiez d'abord à 

n , + l'aide de PIP sur une même disquette 

#08 *H, backspace ou retour arrière 

ee, ’ Fe : SETKEYS.COM (vous devez sûrement 

‘#09 ; fl, caractère de tabulation en avoir déjà plusieurs exemplaires) et le 

#0A line feed ov ligne suivante programme SID.COM qui se trouve sur 

"#OB' la face 3 des disquettes système offertes 

'#OC' form feed ou saut de page par AMSTRAD (serait-ce la première 

‘#0D’ carriage return ou retour chariot | fois que vous utilisez SID ?). 

"#0E' Mettez la disquette en place, puis tapez : 

#0OF' 

#10’ SID SETKEYS.COM <return> 

"#11 Apparaissent alors des messages cabalistiques que vous 

#12’ ae ignorer. Tapez ensuite, immédiatement après 
e dièze : 

"#13! s4B2 <return> 

‘#14 il apparaît : 

"#15 

#16 #042B FF 

7 tapez : 

#19 7f <return> 

‘#1A' tZ, marque de fin de fichier i apparait : 

#18 | escape, caractère d'échappement | :043B 00 

US É séquences telles qu'elles nés: 

#1E doivent être introduites | 

Ph AE sur le clavier français . <return?, puis : 

#1F Lee wsetkeys.com <return> 

"#20! space ou espace 

"#7F' delete ou efface caractère gauche 








Le programme corrigé s'enregistre alors sur 
le disque. 


Tapez <STOP> ou <ALT>C pour revenir à CP/M 
et le tour est joué. 


Il suffit alors de recopier par PIP la nouvelle version 
de SETKEYS partout où elle est nécessaire. 
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PROGRAMME BASIC 


BUDGET 














VIE PRATIQUE 
TOUS NIVEAUX 


FAMILIAL 


Pourquoi ne pas profiter du PCW pour mettre nos comptes à jour ? Facile avec ces quelques centaines 
d'octets tous de basic vêtus. Prenez votre courage à dix doigts et saisissez les pages qui 
suivent comme le décrit l'annexe de la page 56. 


Notez que les codes en fin de ligne ne sont pas à 
saisir, représentés par : 
que la saisie est correcte à l'aide du nouveau 

vérificateur dont l'utilisation est expliquée dans ce 














SOMHHAIRE 


SAI ==) SAISIE 
OBJ ==) RECHERCHE PAR OBJET 
DAT ==) RECHERCHE PAR LA DATE 

SOM ==) RECHERCHE PAR LA SOMME 

OPE ==) RECHERCHE PAR L'OPERATION 

VAR ==) RECHERCHE PAR VALIDATION 

COR ==) CORRECTION D'UN ENREGISTREMENT 
VAL ==) VALIDATION OU INVALIDATION 
CHA ==) CONSULTER UN AUTRE MOIS 
QUE ==) OUVERTURE D'UN NOUVEAU MOIS 


FIN ==) RETOUR AU BASIC 
NOIS ET ANNEE A CONSULTER MN.AA ===) 


qu'elle est représentée 






390). 






sauvegardé, le 






menu de la figure 1. 





L'organisation du 
































gestion mensuelle des 
dépenses. Pour 
démarrer vous avez à 
entrer un mois et une 
année quelconque 
(MM.AA exemple 01.87) qui serviront de point 
de départ. Ensuite vous créez le mois de départ 
de votre comptabilité par OVE qui vous demande 
confirmation (répondre par O ou par N). 
Maintenant, vous pouvez procéder à la saisie des 
dépenses par l'option SA. 





Figure | 


Lors de l'introduction des dépenses, le programme 
demande que vous lui précisiez s'il s'agit du 
COMPTE CREDIT correspondant au compte 
bancaire ou du COMPTE MAISON s'il s'agit 
des espèces gardées à la maison. Par 
conséquent, l'argent retiré en espèces à la 
banque ira automatiquement au crédit du 


COMPTE MAISON. 


La gestion des options est assez 

particulière puisque chacune d’entre 
elles est accessible sans que le menu général 
soit forcément affiché. De plus, chaque fonction 
est appelée par trois lettres (voir figure 1) et 
l'affichage du menu principal s'obtient si vous 
tapez deux fois de suite trois lettres qui se 
distinguent de celles des options du menu 
(exemple : XXX ou ZZZ). 


L'option CHA permet de valider n'importe lequel 
des mois déjà existants afin de procéder à toutes 
les opérations disponibles sur le programme. 


* OO, ils servent à vérifier 


présent numéro (cf Carte blanche à Vincent LEDOS). 


Notez aussi que pour une 
raison qui nous échappe, 
le PCW n'imprime pas la 
barre verticale obtenue 
par <SHIFT>+<;> et 


sur le listing par un signe 
qui ressemble à la lettre 
‘n'en italique (voir ligne 
Une fois entré, vérifié et 


programme est lancé et si 
tout va bien, il affiche le 


PAR GERARD CASQUIL 


La consultation des comptes et l'obtention d'un solde 
se fait par l'intermédiaire de DAT, puis par l'entrée 
du premier et du dernier jour à consulter. Les autres 
options de recherche permettent d'affiner afin de 
retrouver une opération précise suivant la somme 
(SOM), l'opération (OPE) ou la validation (VAR) 
qu'il me reste à vous décrire. 


En effet, toute opération bancaire effectuée peut être 
validée par l'option VAL pour savoir si elle est 
effectivement passée sur le compte (une étoile 
apparaît alors à la suite du montant). Cela permet un 
pointage rigoureux et la connaissance précise du solde 
réel par VAR. 


Pour terminer, je vous conseille de réserver une 
disquette pour les mois et de procéder à de 
nombreux essais avant de vous lancer dans un budget 
définitif. 


programme repose sur la 


19 no$=CHR$(27)+"q":in$=CHR$(27)+"p"" CHI) 

20 ST$=STRINGS(30 ," ")' (49) 

30 cl$=CHR$(27)4+"H"4CHRS(27)4"E"! (GB) 

40 DIM W$(22):DIM DT(22):DIM OBJ$(22):DIM X$(22):DIM M(22):DIM 
0P$(22)' (V2) 

50 DEF FNloc$(C,L,T$)=CHR$(27)+"V"4CHR$(324L)+CHR$(324C)4T$! ( 

H2) 

60 DEF FNin$(NA,t5 NB)=in$+STRINGSCNA " ")+#4$4STRINGSCNE " "4 

na$' (74) 

70 DEF FNIan$(NC C$)=in$+STRINGS(NC C#)+no$' (XH) 

80 CHOIXS="OVE" :FO$=CHRS(27)+"X"4CHRE(32)+CHRS(32)+CHRS(22+31) 
+CHR$(32+89)' (35) 

90 F1$=CHRS(27)+"X"+CHRS(32+1 )#CHR$(32)+CHR$(32+29)+CHR$ (32489 
)' (J0) 

100 F2$=CHR$(27)+"K"+CHR$ (3246 )+CHR$(32)+CHR$(32+1 )+CHRS( 32499 
)' (J1) 

110 f3$=CHR$(27)+"K"4CHRS (3246 )+CHRS(I2)+CHRS(32+22)+CHR$(32+8 

g)' (KI) 

120 FA$=CHR$(27)+"X"4CHR$ (32431 )+CHR$(32)+CHR$(32)+CHR$(32+89) 
! CHV) 

130 PRINT N0S$:F0$:' (52) 


140 
150 PRINT FOS:CLS:" (RQ) 

160 PRINT " 

(XX) 

170 FOR 121 TO 2:PRINT:PRINT:NENT' (LE) 
180 I=0:PRINT STS: VGA] 22) SAISIE"" (IR) 
190 PRINT:PRINT 57$:"0BI ==) RECHERCHE PAR OBJET" (42) 
200 PRINT:PRINT ST$: "DAT ==) RECHERCHE PAR LA DATE"! (C8) 


SOMMAIRE" 
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RECHERCHE PAR LA SOMME" (FM) 


210 PRINT:PRINT ST$:"S0M ==} 

=) RECHERCHE PAR L'OPERATION"" (N2) 
=) 

=) 


220 PRINT:PRINT ET$: "OP 
230 PRINT:PRINT ST$; "VA 
240 PRINT'PRINT ST$: "C0 
(YQ) 

250 PRINT'PRINT' CRV) 
260 PRINT:PRINT ST$:"VAL ==) VALIDATION QU INVALIDATION"' (QQ) 
270 PRINT'PRINT ETS: "CHA ==} CONSULTER UN AUTRE MOIS"' CJA) 
290 PRINT'PRINT STS:"QVE ==} OUVERTURE D'UN NOUVEAU MOIS"' (54 
) 

290 PRINT'PRINT' (R2) 

300 PRINT:PRINT ST$:"FIN ==} RETOUR AU BASIC"' (3J) 

310 IF FI$="" THEN PRINT F48:CLS:CHR$(7):: INPUT "MOIS ET ANNEE 
À CONSULTER MM.AA ===> ",MAS:IF LENCMAS)C>S THEN PRINT CHR$(7 
)'60T0 310! (UV 

320 GOSUB 890' (JA) 

330 60SUB 730' (J4) 

340 GOTO 140' CHI) 

350 END' (A7) 

360 PRINT FO$:CL$:' CRT) 

370 NE=O PRINT LEXSODEEEOENNONEX SAISIE DES EN 
REGISTREMENTS #YHKKEYETKENXREXNEE LE *:MAS:" (MN) 

380 PRINT FI$:CL$: :PRINT'PRINT' (HE) 


RECHERCHE PAR VALIDATION"" (LA) 
CORRECTION D'UN ENREGISTREMENT "" 


D'DmMæ 


390 PRINT " n COM,  MATEn OBJE 
T roP , MONTANT mi" (20) 
400 PRINT M ==..." 
mena esse nn en e nee fut L6N) 


410 LSET VAIS$="":NE=NE4T:IF NE=21 THEN NE=0:60T0 380 (98) 

420 PRINT F4S:CLS$:: PRINT CHR$(7):"#x COMP.CCDREDIT COMP, (MAIS 

ON #t':' (40) 

430 WSCNE)=INKEYS:IF US$CNE)="" THEN 430 ELSE W$(NE)=UPPERSCWS( 

NE))' (UT) 

440 IF USCNE){)"C" AND WS$CNE)C)"M" THEN PRINT CHR$(7):GOTO 420 
! CKY) 

450 PRINT CLS$:CHR$(7);: INPUT “DATE ",DT(NE)' (WS) 

460 IF DT(NE)(1 OR DT(NE)>31 THEN PRINT CHR$(7):GOTO 450" (CEA) 

470 PRINT CLS$:CHR#(7): INPUT "ORJET ",OBJ$INE)' (23) 

480 IF LENCOBJSCNE)))33 OR OBJSINE)="" THEN PRINT CHR$(7):GOTD 
470' CTB) 

490 IF US$CNE)="M" THEN OPSCNE)="*":GOTO 530" (RS) 

600 PRINT CL$:CHRSC7):UKX CE)SPECES . C€ADRTE . COOHEQUE #4" " 
(MX) 

510 OPSCNE)=INKEYS:IF OPSCNE)="" THEN S10 ELSE DP$CNE)=UPPERS( 

QPSCNE))' (2H) 

620 IF OPSCNE)C)"E" AND OPSCNE)C)"A" AND OP$CNE)C)"C" THEN PRI 

NT CHR$(7):G0TD 500" (DD) 

530 PRINT CLS'CHRSCZ):: INPUT "MONTANT ",MINE)' (IV) 

G4Q IF WS$(NE)="C" AND OPSINE)="E" AND NUNE)CO THEN IF LEN(ORJS 

(NE))>20 THEN PRINT CHR$(7):CLS$::GOTD 470' (BS) 

660 IF MCNE)=0 THEN PRINT CHR$(7):G0T0 530" (SN) 

660 obj$(ne)z" "+ob$(ne)+STRING$(39-LEN(obj$(ne))," ")' (A0) 

670 PRINT F18' (J0) 

590 IF W$(NE)="C" AND DT(NE)<10 THEN PRINT FNLOCSCIO,4+NE ,""): 
“COMP CREDIT #':OT(ne):" miobj$(ne)!"n “'op$(NE)" n "im(ne):" 
(PZ) 

590 IF VSCNE)="C" AND DT(NE)92 THEN PRINT FALOCSC10,44NE ,""): 
“COMP CREDIT #:DT(nel:"n''obj$tnel;"n ":op$(NE)'" 7 "imtne);" 
(OV) 

600 IF WSCNE)="M" AND DT(NE)£10 THEN PRINT FNLOC$(10,4#NE ,""); 
“COMP MAISON 7" :DT(ne):" n'iobj$Cne):"n ":Gp#(NE)" 7 "in(ne)" 
(QE) 

610 IF WSCNE)="M" AND DT(NE))3 THEN PRINT FNLOCS$(10,44NE ,""); 
“COMP MAISON n''OTtne):"7:obj$tne):"n "'op$iNE)'" n “imine):" 
(PO) 
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620 PRINT FA$:CLS:CHRS(7):"Xt CC)ORRECTION "RETURN! 5 ‘ENTER' 
POUR CONTINUER #% CHOIX ==) ":' (40) 

630 INPUT "" CHS' (NC) 

640 IF CHS="C" THEN NE=NE-1:6070 410 (HW) 

650 IF CHS="R" THEN CLOSE :RETURN! (ER) 

660 IF LENCCHS)<>0 AND LENCCHS)C3 THEN PRINT CHRS(7):G0TO 629 
U (ND) 

670 IF WSCNE)="C" AND OPSCNE)="E" AND MONE)CO THEN LSET DTI$=h 
KISCOTCNE)D:LSET 0BJ1$=" RETRAIT DIST, "#OBIS(NE):LSET OP1$=0P 
SCNE)LSET MMIS=MKDS(MNE )):PUT 1 LOF(1)41" (9L) 

680 IF WS(NE)="C" AND OPS(NE)="E" AND MCNE)CO THEN LSET DT28=h 
KISCDTCNE)):LSET 0BJ2$=" RETRAIT DIST, "4OBJS(NE):LSET OP2$<"Y 
“.LSET MM2$=MKDSCMCNE)X-1):PUT 2, LOF(2)41 6070 710' (JE) 

890 IF VSCNE)="C" THEN LSET DTIS=MKISCDTINE)):LSET OBJ18=08J5( 
NED:LSET OPIS=OPS(NE) LSET MMIS=MKDSCMCNE)):PUT 1 LOF(1)41' (D 
8) 

700 IF VS(NE)="M" THEN LSET DT2$=HKIS(DT(NE)):LSET DBJ28=0BJ$( 
NE):LSET OP28=0PS:LSET MM2$=MKDSCM(NE)):PUT 2 LOF(2)41' (77) 
T10 IF LENCCHS)23 THEN CHOINS=CHS RETURN ELSE 410' (66) 

720 ! 

730 IF 11 THEN RETURN ELSE CHOS=CHDIKS:PRINT F4$:CLS:CHRS (7); 
"INPUT "ENTER! POUR RECOMMENCER OU CHOIX === " CHOIXS:IF L 
ENCCHOIKS)>3 AND LENCCHOIKS)C)0 THEN PRINT CHRS(7):60T0 730! 
(D3) 

740 IF LENCCHDIXS)=0 THEN CHOIXS=CHDS' (N2) 

760 IF CHOIXS="SAI" THEN I=-1:GOSUB 360 (OU) 

760 IF CHOIXS="DBJ" THEN I=-1:G0SUB 980! (PI) 

710 IF CHOIXS="DAT" THEN I=-1:G0SUB 980' (PO) 

780 IF CHOIXS="SOM" THEN 1=-1:60SUB 980! (PN) 

790 IF CHDIXS="OPE" THEN I=-1:GOSUB 980! (PD) 

800 IF CHOIXS="VAR" THEN I=-1:60SUB 980’ (PA) 

810 IF CHOIXS="COR" THEN I=-1:G0SUB 1940 (QF) 

820 IF CHOLXS="CHA" THEN 1=-1:INPUT *NOIS À CONSULTER "MAS: 60 
SUB 890! (38) 

830 IF CHOIXS="OVE" THEN 1=-1:60SUB 1570 (QM) 

840 IF CHDIXS="VAL" THEN I=-1:G0SUB 2600! (QB) 

850 IF CHOIXS="FIN" THEN PRINT "DEMANDE ENREGISTREE" : :CLOSE:PR 
INT FO$:NOS: CL: :END' (X2) 

860 I=I+l:IF I>1 THEN RETURN! (95) 

870 6070 730' CHE) 

880 ‘ 

890 FIS="B:"#LEFTS(MAS, 2)4RIGHTS(MAS 234" CP"! (X2) 

900 FINS="B'"4LEFTS (MAS, 2)4RIGHTS(MAS, 2)+%MM+t CHPA (54) 

910 IF CHDIKSO"OVE" THEN IF FINDS(FIS)="" OR FINDS(FIMS)="" T 
HEN PRINT "MOIS INEXISTANT "::FOR B=1 TO SO0:NEXT:1=3:FI$="":R 
ETURN! (RB) 

920 CLOSE :OPEN "R",1FIS' CIR) 

920 FIELD 1,2 AS DTIS.40 AS DBJIS,1 AS OPIS,8 AS MNIS,1 AS VAI 
$' (DP) 

940 OPEN "R",2,FINS' (R2) 

950 FIELD 2,2 AS DT25,40 AS OBJ2$,1 AS 0P25,8 AS MM2S' (ON) 
960 RETURN' (HR) 

970 ! 

980 PRINT FO$:CLS:" BÉRESRETEREEIEETEE CO 
NSULTATION HHXSXFEEREEREEEARE LE "HAS: (21) 

990 PRINT F4$:' (LK) 

1000 IF CHOIXS="OPE" OR CHOIXS="VAR" THEN 1040! (YQ) 

1010 PRINT CHRS(7):CL$: "COMPTE À CONSULTER (CREDIT (MAISON 


LES (D>EUX“:" (F6) 

1020 CC$S=INKEYS:IF CC$="" THEN 1020' (F8) 

1030 IF CC$<)"C" AND CC$C)"M" AND CC$<>"D" THEN 1010' CYU) 
1040 PRINT CHR$(7):CL$" (V1) 

1050 QBJ$="":OPP$="":MM=0 DD=0 'DA=0:A=0:C=0:D=0'L=0:S=0:K=0! ( 


MK) E 


1060 IF CHOIX$="0BJ" THEN INPUT “OBJET À CHERCHER (X POUR RECH 

ERCHE lELARGIE) ",0BJ$:1F LEN(OBI$)=0 OR LEN(OBJ$)>40 THEN PRIN 
T CHR$(7):60T0 1040' (82) 

1070 OBJ$=" "+0BJ$+" ‘' (RL) 

1080 IF LEFTS(OBJ$,2)=" #" THEN OBJS=RIGHT$(OBJS, (LEN(OBJ$)-2) 
)' (NC) 

1090 IF RIGHTSCOBJ$,2)="X " THEN OBJS=LEFTS(OBJS, (LEN(OBJ$)-2) 
)' (ND) 

1100 IF CHOIX$="SQM" THEN INPUT “MONTANT ",MM:IF NM=0 THEN PRI 

NT CHR$(7):60T0 1040! (07) 

1110 IF CHOIXS="OPE" THEN CC$="C": INPUT "OPERATION À CONSULTER 
XX4 EXCLUSIF COMPTE CREDIT Ktx CEDSPECES CC)HEQUES CCADRTES " 
 DPPS:IF OPP$C>"C" AND OPP$C)"A" AND OPP$<)"E" THEN PRINT CHR$ 
(7):60T0 1040! CKT) 

‘1120 IF CHOINSC)"DAT" THEN 1150! (A7) 

1130 INPUT "DEPUIS LE ",DD:IF DDC OR DD}31 THEN PRINT CHR$(7) 
:60T0 1040' (31) 

1140 PRINT CHR$(7): INPUT “JUSQU'AU ",DA:IF DA<T OR DA)31 THEN 

PRINT CHR$(7):CL$:60T0 1140 ELSE IF DA<DD THEN PRINT CHR$(7):6 

OTO 1040' (ST) 

1190 IF CHOIASC? "VAR" THEN 1170 ELSE CC$="C": INPUT "EXCLUSIVEM 

ENT DANS 'C' METTRE 'V' POUR VALIDE ‘D’ POUR NON VALIDE ",VR$ 
11F VRSO*V® AND VR$O"D" THEN PRINT CHR$(7);CL$:G0T0 1150" (Z 

N) 

1160 IF VR$="V" THEN VR$="#" ELSE VR$=" “! (LI) 

1170 PRINT FI$' CKX) 

1180 IF CC$="M" THEN 1400! (XX) 

1190 LeLél'6ET 1,L' (QN) 

1200 IF CC$="C" THEN IF L)LOF(1) THEN PRINT:PRINT " 

CREDIT "iCr"  DEBIT ":D:" SOLDE ":CC$;" 

($,2)::RETURN' (SL) 

1210 IF CC$="D" THEN IF LLOF(1) AND K)LOF(2) THEN PRINT :PRINT 
u CREDIT "rCi"  DEBIT ":D:" SOLDE ":C 

C$;"  "ROUND(S,2)::RETURN' (C7) 

1220 IF OBJ$C)" * THEN IF INSTR(OBII$ 0BJ$)20 OR OBJI$=STRING 

$(40," ") THEN 1390' (AA) 

1230 IF MMC>0 THEN IF MMC)CVD(NMI$) THEN 1390! (VO) 

1240 IF CHOLX$="DAT" THEN IF CVI(DTI$)<DD OR CVI(DTI$)>DA THEN 
1390' (UP) 

1250 IF CHOLAS="OPE" THEN IF OPI$C>0PP$ THEN 1390' (34) 

1260 N=CVDCHM1$):DT=CVICOTI$)' (B3) 

1270 IF CHOIASC)"VAR" THEN 1290! (AY) 

1280 IF VRSC)VAIS THEN 1390 ELSE 1310' CH2) 

1290 IF LEFT$(0BJ1$,13)=" ANCIEN SOLDE" THEN 1320! (11) 

1300 IF CC$="D" THEN IF LEFTS(OBJ1$,14)=" RETRAIT DIST," THEN 
1330! (QD) 

1310 IF M<O THEN D=D+(Mx(-1)) ELSE C=C+M' (L3) 

1320 S$=S#M' (F5) 

1330 IF DT<10 THEN A=A+1 PRINT FNLOC$(O,A+1,""):LOCCI):PRINT F 

NLOCSCS,A+1,"") 5 PRINT "COMP CREDIT #:0T:" m':obj1$:" 7 “opl 

$i" n'iM:" "VAS :no$' (V2) 

1340 IF DT)9 THEN A=A+T:PRINT FNLOCS(0,A+1,""):LOCCT) PRINT FN 

LOCS(S,A+1,""); PRINT "COMP CREDIT m#':DT: "7 :obj1$:" 7 "ropls: 

MOn'Mit "iVATSino$" (TV) 

1350 IF AC25 THEN 1390! (V0) 

1360 PRINT:PRINT * 

OUR CONTINUER QU €F} FIN":' (AJ) 

1370 T$=INKEYS:IF T$="" THEN 1370 ' (CW) 

1380 IF T$="F' THEN RETURN ELSE A=0:PRINT CL$' (YY) 

1390 IF cc$="C" THEN 1190! (XW) 

1400 KeK+#1:GET 2,K' (QF) 

1410 IF CC$="M" THEN IF KLOF(2) THEN PRINT:PRINT " 

CREDIT "iCi*  DEBIT ":D:" SOLDE ":CC$:" 
($,2)::RETURN' (SY) 


", ROUND 
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": ROUND 


1420 IF CC$="D" THEN IF LLOFC1) AND KOLOF(2) THEN PRINT:PRINT 
s CREDIT "Ci" DEBIT “:D:" SOLDE ":C 

Ci" ":ROUND(S,2)::RETURN' (CA) 

1430 IF OBJ$C)" * THEN IF INSTR(OBJ2$,0BJ$)=0 OR 0BJ24=STRING 

$(40," ") THEN 1180' (CAC) 

1440 IF MMCD0 THEN IF NMCCVD(MM2$) THEN 1180’ CVP) 

1450 IF CHOIN$="DAT" THEN IF CVI(DT2$)<0D OR CVI(DT2$)>DA THEN 
1180 CUR) 

1460 M=CVD(MM2$) :DT=CVI(DT2$)' (87) 

1470 IF LEFT$(0BJ2$,13)=" ANCIEN SOLDE" THEN 1500’ (13) 

1480 IF CC$="D" THEN IF LEFT$(0BJ2$,14)=" RETRAIT DIST," THEN 
1510" (QN) 

1490 IF M€O THEN D=D+(MX(-1)) ELSE C=C+M' (LC) 

1500 S=S+M' (F5) 

1510 IF DT<10 THEN A=A+T PRINT FNLOCSCS,A+1,""): PRINT "COMP, 

MAISON 7 :0T:" m''obj2$:"n*t n'iM' (08) 

1520 IF DT>9 THEN A=A+I:PRINT FALOCS(CS,A+1,"")1: PRINT "COMP, 

MAISON 7:07; "#:obj2$:"n* m'":M' (P7) 

1530 IF A(25 THEN 1180' (TI) 
1540 PRINT:PRINT * 

OUR CONTINUER OÙ €F> FIN": (AJ) 
1550 TS=INKEYS:IF T$="" THEN 1370 ! (CW) 

1560 IF T$="F" THEN RETURN ELSE A=0:PRINT CL$:GOT0 1180' (EV) 
1570 ! 

1580 PRINT FO$:CL$:" BPM OUVERTURE 

D UN NOUVEAU MOIS REKKRKEEEERERERERE" CHA) 

1590 PRINT FI$:CL$' (RP) 

1600 PRINT:PRINT:PRINT “JE CONSIDERE L'ANCIEN MOIS LE ":MAS::1 

NPUT * "'RPS:IF RP$C>'"0" AND RP$C"N" THEN 1590! (VL) 

1610 IF RPS$="N" THEN PRINT'PRINT:INPUT "ANCIEN MOIS MM, AA ",M 
A$:60SUB 890' (C6) 

1620 S1=0:$2=0' (KM) 

1630 FOR D=1 TO LOF(1):GET 1,D' (70) 

1640 IF OBJISC)STRINGS(40," ") THEN M=CVD(MMI#):S1=$1+M! (CX) 
1650 NEXT' (EJ) 

1660 FOR D=1 TO LOF(2):GET 2,D' (7T) 

1670 IF OBJ2$C)STRING$(40," *) THEN M=CVD(MM2$):S2=S24N' (D4) 
1680 NEXT ‘ (EM) 

1690 PRINT:PRINT: INPUT "NOUVEAU MOIS ",MAS:IF LEN(MAS)€S OR I 
NSTR(MNAS$,",")33 THEN 1690 ' (03) 

1700 FI$="B:"+LEFTS(MAS, 2)+RIGHTS(MAS,2)+" CMP"! (22) 

1710 FIM$="B:"4LEFTS (MAS, 2)#RIGHTSCMAS,2)+" M4" CPU (66) 
1720 IF FINDSCFI$)C>"" OR FINDS(FIM$)C)>"" THEN PRINT "MOIS EX 
STANT EFFACEMENT O/N “INPUT "",EFFS$ ELSE 1760! (QF) 

1730 IF EFF$="0" THEN KILL FI$:KILL FIM$' (02) 

1740 IF EFFS$="N" THEN 1690 ELSE 1720' (E9) 

1750 GOSUB 890 (KU) 

1760 LSET DT2$=MKI8(1):LSET 0BJ2$=" ANCIEN SOLDE" :LSET DP2$="* 
"iLSET MM2$=2MK08(52):PUT 2° (AP) 

1770 REM HANANNNENNNNANNENMENNNATANNAN 
RÉUMENAANENNEENREANNERNRER 

1780 ‘ 

1790 LSET DTI$=MKIS(1):LSET OBJ1$=" ANCIEN SOLDE" :LSET OP1$="4 
M:LSET MMIS$=MKDSCS1):LSET VAI$="k" :PUT l' (77) 

1800 ‘ 

1810 REM HHHE#H#EANAAAMENANEES COMMENT AJOUTER DES VIREMENTS À 
UTOMATIQUES ####HEHNHEAHNNA 

1820 REM ## FAIRE COMME L EXEMPLE CI-DESSUS EN REMPLACANT ; 
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EXEMPLE ######444 


#t 
1830 REM #4 - LE TEXTE DE 0BJ1$ PAR L'O 
BJET DU VIREMENT #4 
1840 REM #4 - EN METTANT LA SOMME VIREE 
À LA PLACE DE S] #+ 
1850 REM ## 


——————————————.—.—.2>…êR 


BUDGET FAMILIAL + L'ECHO DU PCW N°14 


#4 
1860 REM ## FAIRE TOUT CECI 
BNE 1931 À 1969) #4 
1870 REM #4 TAPER RUN POUR FAIRE REPARTIR LE PRO 
GRAMME #4 
1880 REM HHHAAHERHUNENNAENNENNNNNNNNNNENAREERERRANRERANRENRENR 
CLLEEE ÉEEE LEE EEE 2 LEE LEE 
1890 


1900 
1910 REM HAH##HHAHHEK#E CI-DESSUS ZONE RESERVEE POUR VIREMENT( 


SD HHAHAENHENARAARARNNNA 
1920 RETURN' (J0) 


APRES CI- DESSOUS CENTRE LA LI 


1930 ‘ 
1940 PRINT FO$:CL$:" Léterritieentiett 
CORRECTION HXYÉRAXENENRENAEEX LE MiMASI! CYJ) 


1950 L=0:K=0:4=0' (02) 

1960 PRINT F4$:CL$:CHR$(7): "CORRECTION DANS €C?REDIT OU (MAIS 
ON":' (33) 

1970 COS=INKEVS' IF C0$="" THEN 1970! (G0) 

1980 IF CO$<>"C" AND CO$C)"M" THEN 1960! (IJ) 

1990 PRINT CLS$:CHR$(7) INPUT "OBJET À CORRIGER ":OBJCS:IF LENC 
DBJC#)>40 THEN PRINT CHR$(7):G0TD 1990' (IK) 

2000 PRINT FI$:CL$' (RC) 

2010 IF CO$="M" THEN 2250! (V6) 

2020 LeL+I'GET 1 L'IF LLOF(T) THEN RETURN (VH) 

2030 IF INSTR(OBTI$,0BJC#)=0 THEN 2020' (MB) 
2040 OT=CVI(OTIS):M=CVD(MM1$)' (B0) 

2050 IF OT61Q THEN A=A+1 PRINT PRINT " 

OT" m'iobjl$i"n "iopl$i" n'iMino$' (IR) 
2060 IF DT>9 THEN A=A+I':PRINT'PRINT * 

DT m''objl$;"n “ropl$i" n':Mino$' (HA) 

2070 PRINT "CORRECTION O/N "1" (AK) 

2080 TS=INKEYS:IF T$="" THEN 2080' (CU) 

2090 IF T$="N" THEN PRINT CL$:GOTO 2029 (MV) 
2100 IF T$<>"0" THEN PRINT CHR$(7):GOTO 2070' (UG) 

2110 PRINT FA4$:CL$' (RH) 

2120 PRINT "COMPTE À CREDITER (CREDIT CM)AISON":" (AQ) 

2130 CCCS=INFEVS:IF CCC$="" THEN 2130 (J4) 

2140 IF CCC$<o"C" AND CCC#4&)"M" THEN 2110! (KV) 

2150 PRINT CLS$:INPUT "DATE" DTC:IF DTC<O OR DTC?31 THEN 2150" 
{N4) 

2160 PRINT CL$'INPUT "ORJET *,OBJCCS:IF LEN(OBJCC$))38 THEN 21 
60! (03) 

2170 IF CCCS="C" THEN PRINT CLS&: INPUT "OPERATION 'C' 'A' 'E'" " 
QPECS'IF DPECSG)"E" AND OPEC$<}"C" AND OPECS()"A" AND OPECSC> 
"THEN PRINT CHR#(7):GOTO 2170! (J7) 

2180 PRINT CL$"INPUT "MONTANT ",MC' CKN) 

2190 IF CCC$="C" THEN LSET DTIS=MKIS$(DTC):LSET DBJ1$=" "+OBICC 
SILSET OPIS=OPECS :LSET MMI$=MKDSCMC):PUT 1 ,L' (Q2) 

2200 IF CCCS="M" THEN LSET DTIS=MKI$(O) LSET OBJT$="":LSET OPI 
$="":LSET MMIS=MEDS CO) :PUT 1 ,L'LSET DT2$=MKIS(DTC):LSET OBJ26= 
'OBJCCS'LSET OP2$="K" LSET MM24=MKD$(MC):PUT 2,L0F(2)+1" (1 
B) 

2210 PRINT "CONTINUE O/N ":' (60) 

2220 TS=INKEVS:IF T$="" THEN 2220! (CM) 

2230 IF T$="N" THEN RETURN! (40) 

2240 IF T$#="0" THEN PRINT FI6:CL6::G0TO 2020 ELSE GOTD 2210" ( 
GT) 

2250 ‘ 

2260 K=K+1'GET 2,K:IF KMLOF(2) THEN RETURN! (VL) 

2210 1F INSTR(OBJ2$ ,OBJC#)=0 THEN 2260’ CMD) 


COMP,CREDIT 


KONP CREDIT 7: 


2280 DT=CVI(OT2$):M=CVD(MM26)' (B8) 


2290 IF OTS10 THEN A=A+I:PRINT:PRINT " KOMP MAISON n° 
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“DT:" m''obj2$:"n ":op2$:" n"'Mino$' (IV) 
2300 IF DT>$ THEN A=A+I PRINT: PRINT * 
OT'"n':obj26:"n "'o0p2$:" n ":Mino$' (HL) 

2310 PRINT:PRINT "CORRECTION O/N "'' (NH) 
2320 T$=INKEYS:IF T$=*" THEN 2320' (CD) 

2330 IF T$="N" THEN PRINT CLé:GDTO 2260" (MY) 
2340 IF T$<>"O" THEN PRINT CHR$C7):60T0 2310' (UJ) 

2350 PRINT F4$:CLé' (RN) 

2360 PRINT “COMPTE À CREDITER CC)REDIT CHAISON ":' (AW) 

2370 CCCH=INKEVS:IF CCC$="" THEN 2370! (JG) 

2380 IF CCC$C)"C" AND CCC$<>"M" THEN 2360! (LA) 

2390 PRINT CHR$(7):CL$: INPUT "DATE ",DTC:IF DTC<O OR DTC}31 TH 
EN PRINT CHR$(7):GOTO 2390' (49) 

2400 PRINT CHR$C7) CLS: INPUT "OBJET *,OBJCCS: IF LENCORJCCS)}38 
THEN PRINT CHR$(7):GOTO 2400' (20) 

2410 IF CCC$="C" THEN PRINT CHR$(7) CLS: INPUT "OPERATION 'C' ' 
A''E' " OPECS:IF OPECS<C)"C" AND OPEC$C)"E" AND OPECS<)"A" AND 
DPECS<>"" THEN PRINT CHR$(7):G0T0 2410! (VL) 

2420 PRINT CHR$(Z):CL$: INPUT "MONTANT "MC! (A3) 

2430 IF CCC$="N" THEN LSET DT2$=MKI$(DTC)'LSET OBJ2$=" "4O0BJCC 
$:LSET OP2$="X":LSET MM2$=MKDS$CMC) :PUT 2,K' (KB) 

2440 IF CCC$="C" THEN LSET DT2$=MKI$(0):LSET 0BJ2$="":LSET DP2 
$=""ILSET MM2$=AKD$(0):PUT 2,K:LSET DTI$S=MKIS(OTC):LSET OBJ1$= 
"OM4OBJCCS'LSET OPIS<0PECS :LSET MMI$=MKDS(MC) :PUT 1, LOF(1)+1" 
(74) 

2450 PRINT CHR$(7):CL$: "CONTINUE O/N “'' (02) 

2460 T$=INKEYS:IF T$="" THEN 2460! CCY) 

2470 IF T$="N" THEN RETURN! (41) 

2480 IF T$="D" THEN PRINT F1$:CL$::G0T0 2260 ELSE PRINT CHR$(7 
):60T0 2450! (4V) 

2490 ‘ 

2500 PRINT CLS: "COMPTE À CONSULTER CCDREDIT €M>AISON QU LE 
$ {D}EUX ":' (78) 

2510 T$=INKEVS:IF T$="" THEN 2610! (CQ) 

2520 IF T$é<>"C" AND T$<>'M" AND T$<)"D" THEN PRINT CHR$(7) GOT 
0 2500’ (R7) 

2530 IF T$="M' THEN DDD' (WQ) 

2540 FOR L=1 TO LOF(1)' (VM) 

2660 GET 1,L'M=CVD(MMI$)' (12) 

2560 PRINT FO$:CLS:RETURN' (6K) 

2570 ‘ 

2580 ‘ 

2590 ‘ 

2600 PRINT CL$:CHR$C7): INPUT "N° À VALIDER OÙ INVALIDER ",NV:I 
F NV €1 OR NV)LOF(1) THEN PRINT CHRS(7)'GOTD 2600! (YL) 

2610 GET 1 ,NV:IF OBJI$=STRINGS(40 ," “) OR ORJI$="" THEN RETURN 
! (NS) 

2620 IF VAIS$="X" THEN LSET VAI$="" ELSE LSET VAI$="#"" (40) 
2630 PUT I ,NV' (JP) 

2640 PRINT FI$:CL$:' (T9) 

2650 A=0' (AJ) 

2660 IF NV<13 THEN NA=1 ELSE NA=NV-12' (KM) 

2670 FOR Q=NA TO NA+24' (UM) 

2680 GET 1,Q:DT=CVICOTI$):M=CVD(MM1$)' CNY) 

2690 IF Q}LOF(1) THEN RETURN' (9D) 

2700 IF OBJS$=STRINGS(40," ") OR DT=0 THEN 2730' (UD) 

2710 IF DT€I0 THEN A=A#T:PRINT FNLOCS(0,A+1,"")} LOCCI) PRINT F 
NLOC$CS A+ ,""): PRINT "COMP CREDIT DT" #''ob11$:"n "'opl 
Si" n'iMi" "iVAIS nos" (V2) 

2720 IF DT>9 THEN A=A+T'PRINT FNLOCS(0,A+1,""):LOCCT) PRINT FN 
LOCSCS A+ ,"U) PRINT "COMP CREDIT DT" n"'obj1$:"n "'apl$; 
“on'iM" ":VAlSino$" (UT) 

2730 NEXT' (EI) 


mÆONMP MAISON 7: 


2740 RETURN ‘ (J1) 









it 
SERVICE ENTREPRISES 2.1 


Au service de ses lecteurs, L'Echo du PCW met ses compétences, son savoir-faire 
et son important fichier de fournisseurs au service des entreprises de toutes tailles. 


Les prestations de ce service sont regroupées 
dans un catalogue spécial qui sera adressé à toute demande 
libellée sur papier à en-tête mentionnant les numéro de SIRET 
et d'APE (ou titre pour les professions libérales). 


Entièrement gratuit, ce nouveau catalogue ‘‘entreprise‘‘ est remis à jour et envoyé 
régulièrement à toute entreprise ou profession libérale qui en fait la demande. 


SOYEZ PRODUCTIF ! 





- PC/PCW la compatibilité est possible avec le service 
entreprise avec un nouveau service de transfert de fichiers 
soit : recopie de fichiers CP/M vers MS/DOS 

ou l'inverse (MS/DOS vers CP/M). 


- Ce qui sort de votre entreprise est à son image alors soignez-la avec : 
Papier à en-tête personnalisée en continu 
Facture à en-tête personnalisée en continu 
et tout type de formulaires personnalisés en continu. 


- Le service entreprise, c’est aussi une liste de prestataires 
compétents pour résoudre vos problèmes quotidiens comme : 
Programmes sur mesure (tous langages) 

Connexions difficiles 


Maintenance et formation 
ET DE L'ARGENT ! 


* 


N'attendez pas pour inscrire votre entreprise en retournant ce jour le bon ci-dessous à : 
LOGTSTICK - CAPN LE BONAPARTE - BOITE 49 - 93153 LE BLANC MESNIL CEDEX 





- De nombreux revendeurs accordent des remises aux entreprises, 
collectivités et professions libérales. Le service entreprise vous en 
donne la liste actualisée. 
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PROGRAMMATION 





Toujours mieux, toujours plus fort avec les 
auteurs vedettes de l'Echo du PCW 

Ce mois-ci, c'est VINCENT LEDOS qui 
honore notre modeste gazette en livrant 
pêle-mêle ces meilleurs trucs et la dernière 
version du vérificateur super vitaminé : B-12+ 


A PROPOS D’HEURE... 


Le PCW, comme tous les ordinateurs, est muni d’une 
horloge interne qui se met en route dès que 
l'ordinateur est mis sous tension. 

















Dans la logique du système, l'horloge se porte garante 
du synchronisme des opérations qui sont effectuées. 
Pour cette raison, rien ne peut la dérouter et quelque 
soit le traitement en cours, le processeur s'interrompt 
constamment pour la remettre à jour. Que ce soit 
sous Multiplan ou sous n'importe qu'elle application, la 
bonne tenue de l'horloge se fait de façon totalement 
transparente et ne gène en rien les tâches en cours. 


Cette horloge n'a d'intérêt que si nous pouvons la lire 
afin de tirer parti du décompte qu'elle gère avec une 
précision suffisante pour la plupart des applications. 


Elle se trouve en mémoire commune (&HC000 à 
&HFFFF) ce qui signifie que nous pouvons la lire à 
4] & partir de n'importe qu'elle 

& banque où nous nous trouvons. 
La notion de banque n'étant pas 
utile pour notre application, je 
ne m'étendrais pas sur son rôle 
en espérant tout de même avoir 
l'occasion de mieux vous en 
parler un jour prochain. 





Quelle heure est-il ? 


Il existe deux méthodes pour lire l'horloge interne. La 
première consiste à appeler la fonction BDOS 
connue sous le numéro 105. Il faut donc recourir au 
langage machine pour y parvenir. 


Cette routine est décrite dans l'encadré | et je 
m'empresse de rassurer les novices en langage 
machine pour leur dire qu'ils n'auront pas besoin de 
comprendre cette routine pour pouvoir en profiter 
immédiatement puisque je vous propose un petit 
programme basic qui l’intègre. 


Après exécution de cette routine, l’heure se retrouve 
stockée en DCB (Décimal Codé Binaire), c’est-à-dire 
que la valeur 23 décimale ne vaut pas 17 en 
hexadécimale mais tout simplement 23. Le tampon est 
ensuite |u et récupéré pour un traitement simple mais 
suffisamment efficace pour nous donner une heure 
apte à la consommation. 


















TOUS NIVEAUX 





A VINCENT LEDOS 


Voici le programme basic qui permet tout cela : 
PROGRAMME HEUREI.BAS 


10 

20 ‘ X## LECTURE DE L'HEURE AVEC LA FONCTION BDOS N° 105 xxx 
30 ! 

40 RESTORE 60:MEMORY &HBFFF :HEURE=&HCO00! (X0) 

50 FOR N=0 TO 16:READ O$:POKE HEURE+N VAL("4H"+0$):NEXT N' UI4 
) 

60 DATA 0E,69,11,0C,C0,CD,05,00,32,10,C0,C9,00,00,00 00,00: ( 
92) 

10 CALL HEURE' (L8) 

80 ‘ 

90 HEURES=PEEKCHEURE+14)' (69) 

100 MINUTES=PEEK(HEURE+15)' (9) 

110 SECONDES=PEEK(HEURE+16)' (B8) 

120 

130 PRINT HEXSCHEURES ,2)":"HEXS(MINUTES 21": "HEXS(SECONDES 2)" 
(VE) 





BDOS &HO005 
GET__TIME 105 


C,GET__ TIME 
DE, TAMPON 
BDOS 
(TAMPON + 4),A 


TAMPON 2 ; DATE 
| ; HEURES 
l ; MINUTES 
; SECONDES 


Encadré I. Mettons le langage machine à 
contribution pour enfin savoir l'heure qu'il est ! 


La seconde méthode consiste à lire l'horloge interne 
en récupérant directement à 3 adresses les valeurs 
qu'elle y laisse à notre disposition et qui sont : 


64502 (décimal)  &HFBF6 (hexadécimal) pour les heures 
64503 (décimal)  &HFBF7 (hexadécimal) pour les minutes 
64504 (décimal)  &HFBF8 (hexadécimal) pour les secondes 





A ces adresses, les valeurs sont aussi en DCB et nous 
utiliserons le même procédé pour effectuer la 
conversion. Voici donc notre deuxième programme : 


es programmes 
HEURET.BAS et HEUREZ BAS Em 
se trouvent sur la disquette =" 
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PROGRAMME HEURE2.BAS 


10 ‘ 

20 ' 4kà LECTURE DIRECTE DE L'HEURE X## 

30 ‘ 

40 HEURES=PEEK(645021) 1 (05) 

50 MINUTES=PEEK (646031: ! LECTURE DES 3 VALEURS" (45) 

60 SECONDES=PEER(8460411  ‘' (40) 

10 ‘ 

80 PRINT HEXSCHEURES, 2)": "HEXSCMINUTES, 2)": "HEXS(SECONDES 2) 
(U6) 


Heure et DBASE 


Pour terminer ce chapitre sur la façon de récupérer 
l'heure avec le PCW, je vous propose l'équivalent du 
second programme basic en une commande dédiée à 
DBASE Il. 

Facilement intégrable dans une commande plus 
importante elle sera saisie en DBASE par 
l'intermédiaire de l'ordre MODIFY COMMAND 
HEURE <RETURN2 et exécutée par : 

DO HEURE <RETURN>. 


* COMMANDE DBASE I] 
*IPOUR-LEGTURE "DE L'MEURE 
* PAR VINCENT LEDOS 

* POUR L'ECHO DU PCW 


SET TALK-OFF 
* LIT LES TROIS VALEURS 


STORE PEEK(64502) TO H 
STORE PEEK(64503) TO M 
STORE PEEK(64504) TO S 
* LES DECOMPOSE 


STORE INT(H/16) TO HO 
STORE H-16*H0 TO H] 


STORE INT(M/16) TO MO 
STORE M-16*MO TO MI 


STORE INT(S/16) TO S0 
STORE S-16*S0 TO S] 


* AFFICHE L'HEURE 


8 SRIHO]+SRIH, +: +STRIMO, + STRIMI, + TRIO 1}+-STRISI 1] SET TALK ON 





A PROPOS DU VERIFICATEUR B-12 


Comme le signalait très justement l'interactif du mois 
dernier, notre vérificateur de programme BASIC 
cachait quelques petites imperfections que je me suis 
attaché à réparer afin que nous disposions tous d'un 
vérificateur proche de la perfection (cf Echo N°12). 


Rappel important 


Les lecteurs qui découvrent la revue ne connaissent 
pas encore B-12 et c'est à eux que ce petit rappel est 
destiné. Constatant que la lisibilité et la saisie des 
programmes basic parus dans l'Echo étaient rarement 
parfaites, j'ai donc conçu un vérificateur qui se charge 
de coder chaque ligne du programme pour ajouter 


, 


une instruction REM (représentée par ?” ou 





apostrophe) suivie d'un code entre parenthèses qui 
permet à chacun de s'assurer de l'égalité entre le 
listing de l'Echo et celui qu'il vient de taper. 


La procédure est donc la suivante : 


|. Saisie d'un programme quelconque de l'Echo 
(voir page 56 comment y arriver) 


Le programme 
VERIF + 
se trouve sur la disquette 
ECHO N°14 


2. Sauvegarde du programme en ASCII par 
SAVE “SON NOM“,A <RETURN> 

3. Lancement de B-12 par RUN “VERIF“ 

4. Vérification du programme sauvé en ASCII 
par l'entrée de son nom quand B-12 
le demande. 





5. Listage et comparaison des codes placés en fin 
de ligne pour détecter toute ligne où ils pourraient 
différer par rapport à celui de l'Echo. 


6. Correction de la ligne (si une ligne présente un 
code différent) 

7. Retour à l'opération | jusqu'à ce que le 
programme soit totalement identique et puisse donc 
fonctionner parfaitement. 


Le code ainsi placé par B-12 ne doit pas gêner le 
déroulement du programme, enfin n'aurait pas du, 
mais certaine particularité du basic ont fait que cela 
n'était pas toujours le cas. 


Les circonstances dans lesquelles le programme B-12 
perturbait le programme ont été identifiées et 
solutionnées dans une nouvelle version que je vous 
révèle aujourd'hui et qui sera dorénavant la version de 
référence pour ce numéro et les suivants. 


Cas d'erreur : 


Le premier concernait les 
lignes de DATA où le code 
placé par B-12 était lu par le 
BASIC comme une donnée 
parmi les autres du fait 

de l'absence du séparateur 
‘‘:"" (deux points). 

Ce problème est maintenant 
réglé. 

EXEMPLE : 

DATA 23,43,56 devient DATA 23,43,56: (XX) 


Le second est lié au message suivant PRINT dont on 
avait omis de fermer les guillemets. Exemple : PRINT 
“BONJOUR 

C'est vrai que le BASIC accepte cette syntaxe mais 
l'ajout du code faisait que le PRINT l'affichait aussi. 
la solution est donc de fermer automatiquement toute 
chaîne par l'ajout d'un guillemet. B-12 le fait 
maintenant. 

EXEMPLE : 

PRINT ‘BONJOUR devient : 

PRINT ‘“BONJOUR‘“ ’(XX) 

Enfin, dernier point qui n'était pas gênant mais inutile 
était le codage des lignes de REM dont le contenu n'a 
aucune importance pour l'avenir du programme. Donc 
exit ! 





Voilà il ne vous reste qu'à saisir ces quelques lignes en 
vous aidant de l'annexe située en page 56. Notez que 
cette nouvelle version de B-12 est compatible avec la 
précédente (voir Echo 12) et que par conséquent vous 
pouvez fort bien vérifier cette nouvelle version à 


l'aide de l’ancienne. 49) 
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10 REM FRERE EEE OPEL TERRE TERRE 


30 REN K* VERIFICATEUR B+ %* 
SO REM *# Réalisé par * 
JO REM X VINCENT LEDOS * 
J0 REN À* pour } 
IIORENX L' ECHO DU PC L 
130 REM LEXKER EEE LEE EEE EEE ERREUR 
140 REM 


150 ESC$=CHRS#(27) ! Séquence ESCAPE' (J2 


) 

160 CLS$=ESC$+"H"+ESC$+"E"+CHRS(13) 
r l'écran (K6)j 

170 C$="0123456789ABCDEFGHI JKLMNOPQRSTUVYXY2"" (98) 

180 DEF FN T$(C)=HID£(C$,C+1,1) ! Transforme une valeu 
r en son code' (W0) 


! Variable pour efface 


190 ROUT=&HD000 ! Adresse de la routin 
e LM' (UU) 

200 MEMORY ROUT-] ! Fixe HIMEM' (CM) 

210 FOR N=0 T0 9S:READ 0$ ! Lit les 96 codes de 
la routine ,,,' (HV) 

220 POKE ROUT+N, VAL("&H"+0$):NEXT N: let les POKE en nénoi 
ge' (P7) 

230 DATA 46,23,6E,23,56,21,00,00,22,00:' (H1) 

240 DATA D1,AF,32,02,01,EB,7E,FE,22,20:' (KV) 

250 DATA 08,3A,02,01,3C,32,02,01,3E,22:' (J6) 

260 DATA 18,2E,FE,20,20,04,3€,00,18,261' (IS) 

2170 DATA FE,09,28,F8,FE,40,20,04,3E,41:' (KT) 

280 DATA 18,1A,FE,7B,20,04,3E,45,18,12:' (J6) 

290 DATA FE,70,28,F8,FE,7C,20,04,3E,55:' (LI) 

300 DATA 18,06,FE,5C,20,02,3E,43,C5,ES:' (JU) 

310 DATA 06,00 ,4F,2A,00,01,09,22,00,D1:' (16) 


320 DATA E1,01,23,10,B1,C9:' (20) 

330 PRINT CLS$:"VERIFICATEUR : Réalisé par Vincent LEDOS pour 

L'ECHO du PCW'' (LO) 

340 PRINT STRING#(12," "):PRINT' CHK) 

850 PRINT "BUT: Cet utilitaire permet de marquer chaque ligne 

d'un programme avec deux codes résul-tant de la composition 

de cette ligne, Ces codes permettront de retrouver plus rapid 

enentune erreur que l'on aura faite en copiant le progranne ,"' 
(UB) 

360 PRINT:PRINT “Le programme à analyser doit ètre sauvé sous 
forme ASCIT,"" (M2) 

370 PRINT'PRINT' (RY) 

380 LINE INPUT "Non du progranme (sans Le type ‘,BAS') : ":T$" 
(NO) 

390 IF T$="" THEN PRINT CLS$::END' (F6) 

400 IF FINDS(T$+" BAS")="" THEN PRINT'PRINT "Ce progranme n'ex 
iste pas, ou n'est pas Basic, Recomnencez, , ,":CHR$(7);:FOR N=1 
TO 3S000:NEXT N:607T0 330' (02) 
410 T2$=7$+" BAS" 

ersion' (2V) 

420 T1$=7$+",BAK" 

rsion' (KV) 

430 IF FIND$(TI$)<>"" THEN KILL TI$' (EV) 

440 NANE T2$ AS TI$ ! Change le non du pro 

gramme’ (0B) 

450 PRINT:PRINT' (RI) 

460 OPEN "I" ,1,TI$:OPEN "0",2,T2$ 

iers' (KK) 

470 WHILE NOT EOF(1) 

e des lignes ,,,' CHR) 


! Non de la nouvelle v 


! Nom de l'ancienne ve 


! Quverture des 2 fich 


" Tant qu'il y à encor 


480 LINE INPUT #1,L$ ! Lit la ligne à coder 
! CRY) 
490 PRINT CHR$C13); "Ligne": VAL(LS); 


(I) 


"Affiche son nunéro' 


500 IF LEN(L#)26 THEN IF MID$(LS,LEN(LS)-5,3)="" (" THEN L$LE 
FT$CL$,LEN(L£)-6)' (71) 
510 ! Elinine les codes dé 
jà présents' (P6) 
620 IF LEN(L$)>248 THEN 830 
pas de codes' (NB) 
530 2$=UPPERS(LS):CALL ROUT(2$) 
M' (IH) 
540 SUP=0' (E6) 
560 REM 
560 REM X4X Premier cas particulier : 
EM ou ‘ =) pas de code *Y** 
570 REM 
580 W=INSTR(LS," “) "Recherche le début d 
e la ligne après le nunéro de celle-ci' CHX) 
590 IF MIDS(LS,V+1,3)="REN" OR MID$(LS,W+1,1)=""" THEN 770' (A 
0) 
600 REM 
610 REM X** Second cas particulier : 
620 REN 
630 IF INSTR(LS, "DATA ")=0 THEN 60T0 670" Si la ligne ne compo 
rte pas Le mot DATA alors passer au cas suivant (UT) 
640 W=INSTR(LS, "DATA "):W$=MIDS(LS$,W-1,1)' (RS) 
650 IF W$C":" AND W$()" " THEN GOTO 670' CIM) 
660 IF INSTR(W,L$,":")=0 THEN L$=L$+":":SUP=68 ‘ Ajoute : à 1 
a fin de la Ligne sinon le vérificateur perturbe le progranne' 
(FP) 
670 REM 
680 REM #3* Troisième cas particulier : 
_ne_sont_pas_fermés X3* 
690 REM 
7100 IF (PEEK(&HD102) MOD 2)=1 THEN L$=L$+CHR$(34) : SUP=34 
! 1 le nonbre de guillenets est impair alors il faut en ràj 
outer un' (IH) 
110 C=(PEEK(&HD100)+2S6#PEEK(&HDI 01 )) 


! Ligne trop longue =} 


" Exécute la routine L 


la ligne commence par R 


DATA #XX 


PRINT “les _guillenets 


! Lecture du code tota 


l' CH3) 

720 C=C+SUP " On lui ajoute un sup 
plément s'il y a' (8E) 

730 C=C MOD 1296 ! On en prend le modul 
o 1296" (SI) 

740 CI=INT(C/36):C2=C-36xC1' (52) 

750 CODES=FN T$CC1)+FN T$(C2) ! Transforme le code e 
n 2 caractères ,,,' (XV) 

T60 L$=L$+"" ("+CODES$+")" "Et les ajoute à la 1 


igne Basic' (9%) 
170 PRINT #2,L$:1F LENCL$)=255 THEN INPUT #1,L$ ‘ Stocke La no 
uvelle ligne avec les codes' (X0) 


180 VEND " Passe à la ligne sui 
vante' (LO) 

790 CLOSE ! Fermeture des fichie 
rs' (LH) 


800 PRINT:PRINT' (RW) 

810 PRINT "Codage des lignes terminé," 
820 END' (A9) 

830 PRINT ": Trop longue pour pouvoir mettre le code."' (JE) 
840 GOTO 770' (HF) 


! Message final' (62) 


A ———————————————.….—.—.—.—<—.—.—.2.2R 
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10 REM FEREKEANELEEREREELEXERREELEXTE 
Ÿ 


30 REM * CATALOGUE DE DISQUETTE X* 
L 


A0 REM 

50 REM * REALISE PAR VINCENT LEDDS * 

60 REM * Li 

TOREM * POUR L'ECHO DU PCU * 

80 REM * LS 

90 REM KARRELAE EEE EOONEEECEEKX 

100 REM 

110 ESC$=CHR#(27) " Séquence ESC 
APE" (IV) 


120 CLS$=ESCH+"E"+ESCS+"H"+CHRS(13) ! Pour effacer 


l'écran' (GW) 

130 BIP$=CHR$(7) 

sonore' (L4) 

140 DIM N$(1,64) 

enant Le nom des fichiers' (GC) 

150 REM 

160 REM X4X PROGRAMME PRINCIPAL *XXY 

170 REM 

180 PRINT CLS$:"CATALOGUE D'UNE DISQUETTE 
cent LEDOS pour L'ECHO DU PCW"' (64) 

190 PRINT:PRINT' CRY) 

200 X=0:G0SUB 490 

à face ÀA' (N3) 

210 NI=N'NI$=N$' (MH) 

220 PRINT' (F5) 

230 X=1:GOSUB 490 

à face B' (N3) 

240 N2=N:N2$=N$' (MM) 

250 OPTION FILES "OA" 

0' (KB) 

260 PRINT "Classenent alphabétique des fichiers, “:' (F2) 

210 X=0:N=N1 :GOSUB 690 ! Classenent d 
es fichiers de la face A' (OU) 
280 X=1'N=N2:GOSUB 630 

es fichiers de la face B' (PO) 
290 PRINT'PRINT' (R2) 


! Pour le bip 


! Tableau cont 


Réalisé par Vin 


! Lecture de 1 


! Lecture de 1 


! Fixe le user 


! Classement d 


300 REM 

310 REM --- IMPRESSION DU CATALOGUE --- 

320 REM 

330 PRINT "Sortie sur imprimante: |, colonne gauche , 2, Ca 


lonne droite : ":BIP$:' (01) 

340 1$=""' (AT) 

350 VHILE 1$C>"1" AND I$()"2"' (34) 

360 IS=UPPERSCINPUTS#(1))' (2Y) 

370 VEND' (C0) 

380 PRINT 1$:" ":' (NJ) 

390 T=0:1F [$="2" THEN T=40' (21) 

400 M=MAXÇNI N2):LPRINT ESC$:"O":ESC$:"E"" (TR) 

410 LPRINT TABCT):NIS:TABCT+#16+(T=40)):"l "iN2$" (26) 

420 LPRINT TABCT):STRINGS(LENCNI$)," "):TABCT+16+(T=40));"t © 
STRINGSCLENCN2$),""")" (PV) 

430 FOR N=1 TO M' (MI) 

440 LPRINT TABCT):N$CO,N):TAB(T+16+(T=40));"1 ":N$CI,N)' (AG) 
450 NEXT N' (FA) 

460 PRINT' (FB) 

470 LPRINT ESC$;"2"" (TG) 

480 END' (AB) 

490 REM 

500 REM X4*x LECTURE DES FICHIERS D'UNE FACE #XX 
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510 REM 
620 PRINT “Insérez la face ":CHR$(6S+K)", puis appuyez sur une 
touche, ":BIP$:' (IJ) 


530 IS=INPUTS(I) PRINT “Maintenant attendez, ":PRINT' (IU) 
540 RESET :N=0 :US=0 :M=0 "US = user ac 
tif! (S6) 
550 2$="4"" (CJ) 
560 OPTION FILES CHR$(48+US)+"A" 
à analyser' (JV) 
570 WHILE 2$(""' (NL) 
580 N=N+1:M=M+1:2$=FINDS("X ,X",M)' (ET) 
590 N#CX,N)=CHRS(48+U)+":"+STRIPS(2$)' (L3) 
600 IF 2$<>"" THEN PRINT NSCX,N):SPACES(4):" CTP) 
610 WEND' (CL) 
620 US=US+1:N=N-11M=0" (YU) 
630 IF US<8 THEN 550" (ST) 
640 NSCX,N+1)="" PRINT! (YB) 
650 PRINT:PRINT N''Fichiers trouvés, ";BIPS" (3T) 
660 PRINT "Titre de la face ":CHR$(6S+X):" (15 caractères maxi 
LS Mae CT 0) 
670 INPUT N$:NS$=LEFT$(N$,15):PRINT' (KJ) 
680 RETURN' (HQ) 
630 REM 
100 REM *#* ROUTINE DU CLASSEMENT ALPHABETIQUE X#X 
710 REM 
120 MEN 
fichiers à classer' (99) 
7130 M=INT(M/2)' (LQ) 
740 IF M=0 THEN RETURN ! si M=0 alors 
le tri est terniné' (GH) 
750 K=N-M:J=1' (KE) 


! Fixe le user 


! M=Nombre de 


7160 I=J' (AS) 

170 LeI+M:IF N$(X,L)CEN$(X,L) THEN 800 ! X=0 si face 
A, X=1 si face B' (Q3) 

180 SWAP N$CX,1),N$CX,L) " Effectue un 


échange entre deux nons' ($6) 
190 I=I-M:IF 1}=1 THEN 770' (25) 
800 J=J+1:1F J>K THEN 730' (00) 
810 GOTO 760' (CHB) 


LE CLUB ECHO, 
C’EST L’AFFAIRE DU SIECLE ! 
N'’OUBLIEZ PLUS LE CLUB 
ET TOUS SES AVANTAGES... 


d 
RAS 
a? 


Ïl — 
2CU A À 


Me BOGART DTA HUMPHREY 
MEME 5 1/02/1989 CITANT © 74894 


Cette cañe strictement personnelle SIGNATURE XXX 
donne droit a toules les achvites Ou CIUD 








PROGRAMMATION 


CATALOG ET ORDRE DANS L'ORGANISATION Utilisation 
DES DISQUETTES... 





Pour essayer CATALOG nous allons utiliser la 
disquette système livrée avec le PCW. Lançons le 
programme par RUN et insérons la FACE I 
(LOCOSCRIPT). Une fois tous les titres des fichiers 
de cette face affichés, le programme demande 

Les huit premiers USERS (ou groupes pour l'entrée d'un nom de moins de 15 caractères. Dans 
LOCOSCRIPT) sont lus et affichés par le notre cas, le nom “LOCO FACE |“ fait 
programme (juste avant le nom du fichier). parfaitement l'affaire. 












Mon dernier sujet est un programme en BASIC 
permettant l'édition d'étiquettes reprenant tous les 
fichiers situés sur les deux faces d’une disquette. 


Nous retournons alors la 
disquette, pressons une touche et 
entrons le nom de cette 
deuxième face qui sera par 
exemple : “CP/M FACE 2“. 


Le tri prend quelques secondes et 


CATALOGUE D'UNE DISQUETTE Réalisè par Vincent LEDOS pour L'ECHO DU PCH 








Insérez la face À, puis appuyez sur une touche, Maintenant attendez. 


qu CO.ENS 0: 9: CE ou Q:MODELE STD  G:PHRASES .STD débouche ste l'ebtiom de 
: ETES # alé ss 9: ne ua SELS EP SAUÉE TE justification de l'étiquette. Soit 1 

QICONT 9: TPRCE. A :LETAPRCE. NOR O:LETIRE .ENT @:LETIRE . pour gauche ou 2 pour droite et 
Q:MANUSCR . : O:MODELE .ETI © O:PAGENUM .CEN  G:PAGENUM .NDR D impresion-dérarré bout doiner 


@:PAGENUM ; TEX 0 PARASES LET  @:PHRASES .NUL © ©:MODELES .GRP 


e9 Fichiers trouvés, 
titre de la face À (5 caractères maxi) : 9 LOCO FACE 1 





ce que nous devrions tous obtenir 
(voir encadré 3). 









Voilà, c’est sur cette modeste 
contribution au savoir PCWiste 
que je vous laisse en souhaitant 








Insérez la face B, puis appuyez sur une touche, Maintenant attendez, 


Q:J14FCPM3.EMS  O:DISCKIT COM O:BASIC COM @:DIR COM  0:ED .COM qu'elle vous sera aussi utile 
Q:ERASE CON OLA UAGE : CON OPALETTE COM G:PAPER CON O:Plp . -CON dune: 
RTE SE ES 

GENS OP OGORPED BAS HE ‘SUB  O:PROFILE FRA 





















84 Fichiers trouvés. 
Titre de la face B (15 caractères maxi) : ? CP/M FACE 2 


Classement alphabétique des fichiers. 
1, colonne gauche , 2, Colonne droite : # 





Encadré 4 : Des étiquettes 
claires au format des boîtiers, 
quoi de mieux ? 





Sortie sur iaprinante: 








Encadré 3 : Un classement des disquettes plus 
qu'efficace avec CATALOG ! 





Ensuite, le programme demande le nom de la face de 
la disquette, refait l'opération avec l'autre face et 
classe tous les fichiers par ordre alphabétique. 


CF/M FACE 7 





L'impression d'une étiquette au format des boîtiers de 
disquettes s'en suit avec deux choix de justification 
possible. 





LANGUAGE : 


es O:FALETTE € 

Saisie du programme 0 : PAPER 
Numéroté de 10 en 10, le programme peut être saisi £ :PRDF ILE :FRA 
à l’aide de la fonction AUTO qui évite d’avoir à 2: RENAME COM 
frapper le numéro de ligne. Pour sortir du mode ee 
AUTO n'hésitez pas à recourir à la touche <STOP> 'ETI °C M 
qui interrompt la numérotation automatique. . (ST .. 

Une fois la saisie terminée, Res de 

sauvez le programme en t :NDR Ne 

ASCII par SAVE Lee 

“CATALOG“,A Arr 

<RETURN> ; 


et passez le au vérificateur 

B-12 pour vous assurer que 
tout est conforme au listing 
que je vous ai proposé à la 
page précédente. 
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COMMENT REDUIRE VOTRE 


VOS TRANSACTIONS 


(télex, bourse.) ? 





. MYNEA ET SYNEA POUR PCW SONT DISPONIBLES 
, 

SERVICE TELEMATIQUE? à CHEZ VOTRE REVENDEUR. C'est une exclusivité D.D.I. 
(1) 48.67.28.44 + 











À - RECEPTION 


3. Choisir (en utilisant la 
touche [+] en <FI> : 














ALAIN HARTMANN - PARIS 15 


RS 232 - ENREGISTRER LE MINITEL 
LE CONSULTER 


Pour ceux qui sont les heureux acquéreurs d'une 

CPS 8256 et qui voudraient l'essayer sur minitel, 

on ne trouve pas d'indications simples pour valider les 
fenêtres de MAIL232 présent sur les disquettes 

systèmes. 

Voici donc le moyen de stocker des fichiers Minitel sur 
PCW et de les relire ensuite sur son Minitel gratuitement. 


|. Raccordez minitel-RS232 avec cordon spécial (faisable soi- 
même ou vendu dans les 200 F dans le commerce). 
Allumez le minitel. 


2. Chargez MAIL232 en M: 


4. Ecrivez le nom du nichier en Receive 
après <F52> 











5. Tournez vous vers le minitel et 
composez le 3615, tapez 
CONNECTION/FIN. 


6. Tournez vous vers le PCW et, 
l'inversion vidéo se trouvant 
toujours sur le nom du fichier, 
tapez <ENTER>. 





































Répondez à toutes les questions du minitel : ça enregistre. 


7. A la fin de la communication, tapez <ALT> + <Z> sur 
PCW, jusqu'à ce que <F1> fonctionne. N'y changez 
rien, CPS 8256 reste programmée sur les indications 
jusqu'à rechargement de MAIL232 (raisons fréquentes 
d'échec). 


B - LECTURE DU FICHIER AINSI STOCKE : 


Tapez <F5», écrivez le nom du fichier créé et tapez 
<ENTER>. Le fichier enregistré (comme avec un 
magnétophone) s'affiche sur l'écran du minitel, mais. 
certains serveurs en se connectant envoient un signal 
interprété par l'ordinateur comme une fin de fichier, d'où la 
nécessité pour visualiser le fichier en entier de retourner 
sous CP/M par <F7> et d'utiliser PIP.COM. 


PIP.COM parce qu'il contient une extension qui permet de 
forcer ce qui peut être interprété comme une fin de fichier, 
voici le secret : après le prompt <A> écrire : 

PIP AUX:=M:TOTO.TEL. 


Le fichier s'affiche à toute vitesse devant vos yeux ébahis… 
comment l'interrompre ? Tapez la touche <PTR> et pour 
reprendre le défilement, tapez la touche <EXIT2>. Vous 
pouvez ensuite copier le fichier en A: 


LOGO - REMPLIR LES FIGURES - FILL 


Il'existe une primitive en LOGO qui n’est pas explicitée 
dans les manuels AMSTRAD, du moins dans celui qui est 
en ma possession, il s'agit de la primitive fill. 


Pour l'utiliser : s'installer avec pu (pen up) à l'intérieur 
d'une figure fermée de préférence (sinon on rigole). Tapez 
pd (pen down) puis fill... et ça remplit. 


SYNEA - PCW AVEC UN SEUL LECTEUR 


Dans la notice SYNEA, proposée avec le produit, il 
n'existe pas de renseignements sur les possibilités d'utiliser 
un seul lecteur. Pourtant, SYNEA est un logiciel très 

sympathique qui a, malgré tout, la particularité d'aller 













û 
HE 
eroete b 
ADO IF Mae Ve TEE nette ELSE Age © (LE) RACE 
AC ITUN TENTE) Éri te DENTS 
100 IF CCuere TN Vase" tn) à 4 AE) 
ETICOR EN 5333 3 ef) 
NS 1F CCHetC® TN JF COECN) TRO PANTIN * lis = 
C'ULER ARC TEE ES sax ‘ic mdr n 






18,0; RETUe (50) is TS 

10 17 CCHe®D® TN IF LLDECN) 0 DLOF(2) DEN PRUT:PRINT SR HÈ EH res : 
à CMOIT “ei DENT 0; SOU "€ ) HE D 8 

CRE OR IRC DT) Efes CHEN IPN MENIRTIMSNODNENTE 
LD IF OJNO® THE LE JRSTRCOZIN,DEUS)e0 OR OUI ETRIN 


(ES écle 
RE 
PHAALDE 


chercher des fichiers un peu partout et aussi d'écrire un peu 
partout tout en obligeant à garder la disquette SYNEA 
insérée en A: (et pas un peu partout). 

Dans le premier temps, je conseille aux gens qui veulent 
tester leur serveur, de faire les opérations qui suivent : 


|. Copier avec DISCKIT la face | SYNEA sur une 
disquette vierge. 


2. Formater la face 2 de cette disquette vierge. 


3. Insérer cette même face 2 à chaque fois que la face 
demande de retourner la disquette. 


4. Copier les à partir de la face 2 originale les fichiers 
suivants sur la face 2 : 


PIP.COM 

JI4FCPM3.EMS 

RPED.BAS 

PROFILE.SUB 

BASIC.COM 

SUBMIT.COM 

SETSIO 

MESSAGE.* 

DIALOGUE.* 

PARA.DON (ne pas oublier de valider MA, sur toutes 
les faces, qui est contenu dans PARA.DON ; faire un 
type PARA.DON pour vérifier, il doit en effet être 
cohérent partout, y compris version minitel OUI/NON). 


5. Modifier PROFILE.SUB avec RPED.BAS en 
remplaçant tous les fichiers après PIP : 
- par ceux que vous avez créés, y compris votre 
propre RACINE.SOM 


- en ajoutant : 


ARB.* 
BAL.* 

LANCEMENT DU SERVEUR :| MNEMO. 

. Insérez la disquette 
AUTO-EXEC que vous avez 
créée. 


BALNOM.* 
PARA.* 
DIALOGUE.* 





2. Insérez la disquette originale SYNEA face 2. 


3. Tapez A:BASIC SYNEA. L'ordinateur ira chercher vos 
fichiers en M: et ne fera des incursions en A: (où se 
trouvent encore tous les fichiers sans exception), que si 
certains fichiers sont manquants en M: 


L'intérêt est pour le débutant de bien connaître tous les 
fichiers avant d'en supprimer quelques uns sur la disquette 
originale. 

Quand vous aurez tout ça bien en main, vous pourrez 
supprimer les fichiers originaux et écrire BAL.DON et 
BAL.IND en A: pour enregistrer vos messages sans avoir à 
les recopier depuis M: 


IMPORTANT : Toujours utiliser PIP pour transférer des 
fichiers sur l'originale. Ne jamais transférer des fichiers sur 
la disquette originale avant d’avoir fait le ménage : dès que 
le disque est plein, il refuse de fonctionner. 

NB : Je n'ai pas proposé l'option de COMMANDE pour 
simplifier. 








COURRIER + L'ECHO DU PCW N°14 


COURRIER 


L'ECHO 


Des trucs extras qui vous valent 10 disquettes vierges et la 
reconnaissance de nombreux lecteurs ! 





FRANCIS ANDRIEU - 04 MANOSQUE 


Je voudrais, si vous le permettez, faire quelques commen- 
taires à mes réponses sur votre enquête : 

- Nombre de pages : suffisant. En effet, l'Echo ne se lit pas 
comme un roman malgré tous les efforts des auteurs des 
articles pour se mettre à la portée des débutants (je parle 
bien sûr au nom de moi-même). 

- L'Echo vous a-t'il aidé : un peu. Je viens de découvrir 
l'Echo. Je viens d'acheter la collection depuis le N° 1, mais 
je n'ai pas encore tout lu. Il se peut que dans quelques 
temps, je révise mon jugement. 

- Avez-vous découvert des idées ou des sujets : réponse 
identique. 

- Avez-vous un autre ordinateur : non. Toutefois, mon 
travail m'amène à utiliser des appareils informatisés mais sans 
entrer dans le logiciel. 

Dans un autre ordre d'idée, dans des articles concernant le 
BASIC, vous avez indiqué que : 

- la touche <DEL-—> efface le caractère à droite du 
curseur. À ma connaissance, cela n'est pas exact : cette 
touche efface le caractère situé sous le curseur. 

- l'action simultanée sur les touches <ALT> et A fait 
revenir la ligne précédente. Mais cela n'est pas exact quand 
on est en “AUTO par suite du N° de ligne qui s'inscrit et 
qui empêche cette fonction. 

- Utilisation d'“ESPACE" : après avoir indiqué à 
l'ordinateur : esc$ + “ “ 

Or, dans un programme que j'ai fait, je n'ai pas mis le “+ 
et ça marche (je n'ai pas fait exprès). 


Dans l’un des n° de l'Echo, vous donnez une méthode pour 
transformer la base 10 en hexa ou en binaire. Je voudrais 
vous en donner une que l'on m'a enseignée et que, 
personnellement, je trouve assez simple. 
|. on transforme le nombre binaire en octal par une suite 
de division par 8. 
2. chaque chiffre du nombre octal est traduit en binaire : 
nous avons notre nombre binaire. 
3. on groupe les chiffres binaires par 4 et on traduit en 
hexa : nous avons notre nombre hexa. 
Exemple : soit à traduire 51243 
L. on fait 5 divisions par 8 et nous avons successivement les 
restes suivants : 3, 5, 0, 4, 4, 1 
d'où le nombre en octal : 144053 
2. chaque chiffre est traduit en binaire : 
I 4 4 0 5 3 
001 100 100 000 101 O1! 
d'où le nombre binaire 
3. on groupe les chiffres par 4 et on traduit : 
1100 1000 0010 1011 
C 8 2 B 


d'où le nombre en hexa. 


Qui va être le fouetté du mois cette fois-ci, si ce n'est 
l'habituel redresseur de torts ? 

Dans l'interactif de l'Echo N° 10, il affirme que l'article de 
Tony Luzy est dans l'Echo N° 6. Erreur, c'est dans l'Echo 
7. Deuxième erreur, quelques lignes plus bas, la ligne fautive 
n'est pas E=9A mais E#9A. 

D'ailleurs, il n'a pas osé signer son article. Un double dose 
de coups de fouet serait logique. 

J'en ai assez dit pour aujourd'hui, j'envoie mes meilleures 
salutations à toute l'équipe qui a l'air bien sympathique. 
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L'ECHO 


Vraiment c'est à se demander si les rédacteurs de l'Echo ne 
sont pas de grands rêveurs. 5 disquettes pour le truc de la 
conversion et pour nous faire pardonner ces horribles 
coquilles. Que chacun des responsables s'auto-flagèlent une 
bonne fois ! 





J.-JACQUES LEBLOND - LILLEBONNE 


Amis du PCW, Bonjour. Je cherche la solution au problème 
suivant, page 145 du manuel AMSTRAD consacré au 
CP/M, on nous indique la séquence d'escape ESC b cet 
ESC c c pour définition de réglage des couleurs vertes 1°" 
plan et arrière plan. ESC étant naturellement CHRS(27), je 
n'ai pas réussi à obtenir les degrés de couleurs espérés. 
Alors qui veut bien m'aider. Bien amicalement, Votre 
PCWiste acharné. 


L'ECHO 


Malgré ce que laisse entendre le fameux manuel, l'écran du 
PCW n'offre pas d'autres nuances que clair et foncé. 
Pour choisir l'une ou l'autre, deux solutions restent 
envisageables : 


- Sous CP/M : à l'aide du programme PALETTE soit 
PALETTE 1,0 pour écran clair ou PALETTE 0,1 pour 


écran foncé. 


- Sous Basic : voici un petit truc simple à mémoriser : 
Ecran clair : PRINT CHRS(27)“cA‘“ avec A pour allumer 
Ecran foncé : PRINT CHRS(27)“ce“ avec e pour éteindre. 


MARC BOUVIER - MADRID 


Me promenant dans le rayon micro de la FNAC de 
LYON, je suis tombé par hasard sur les premiers numéros 
de l'ECHO DU PCW. Enfin, après plus d'un an d'attente, 
un an à acheter des revues dont 80% finissaient 
régulièrement à la poubelle, je trouvais enfin une publication 
réservée au PCW. Vous trouverez ci-joint mon chèque 
d'abonnement dont je ne doute pas qu'il sera un bon 
investissement. 

Comme la machine est branchée, j'en profite pour vous 
poser déjà quelques questions. 

J'ai été un des premiers acheteurs du PCW en Espagne, car 
j'avais besoin d’un clavier QWERTY espagnol. Je signale 
que, contrairement à ce que me disaient les revendeurs 
espagnols ou français consultés, il est parfaitement possible 
de faire tourner des programmes francais, par exemple 
LOCOSCRIPT français sur cette machine. Cependant, il y 
a parfois des problèmes d'ajustement. Par exemple, dans 
DBASE II (français), comment introduire un autre 
‘‘language'* pour pouvoir créer par exemple des fichiers en 
espagnol ? 

De même, je vois que sous LOCOSCRIPT français, le 
clavier est un AZERTY. Or, si je fais ‘language 1° sous 
CP/M un certain nombre de touches changent 
effectivement de définition, mais le clavier reste un 
QWERTY. Pourquoi ? 

Existe-t'il dans le commerce des autocollants ou un autre 
moyen pour repérer les touches redéfinies ? 

En achetant un deuxième lecteur, je me demande si je n'ai 
pas fait une bêtise. En effet, je crois qu’en achetant un 
deuxième drive intégré, je me suis oté la possibilité d'un 
drive 51/4 qui m'aurait permis de faire au moins les copies 
de sauvegarde sur des disquettes dont le prix et la 
disponibilité sont sans commune mesure avec nos (très) 
chères 3°*. Y a-t'il une solution ? | 





COURRIER 





JOMMENT SAISIR UN PROGRAMME 


Enfin, une préoccupation à plus long terme que je ne suis 
sans doute pas le seul à avoir. Je suis sur le point de 
commencer une application de généalogie-démographie avec 
DBASE II qui comprendra un très grand nombre de fiches 
et de fichiers. Un gros travail et beaucoup d'heures de veille 
en perspective. Qu'adviendra-t'il de ces enregistrements 
dans quelques années quand le PCW sera devenu vieux ou 
quand j'aurai envie de lui acheter un successeur ? Peut-on 
espérer qu'il existera alors une manière quelconque de récu- 
pérer tout ce travail sur un système différent, ou faudra-t'il 
tout recommencer ? La sortie du 1512 et les pratiques 
courantes du monde de la micro-informatique me font douter. 


L'ECHO 


Eternel problème que l'internationalisation des claviers. Le 
PCW n'est pas le seul à poser le problème et l'utilisateur 
peut trouver une issue raisonnable en ayant recours au 
programme de redéfinition de touches SETKEYS.COM 
utilisable sous CP/M. 

De nombreux articles parus dans l'Echo en décrivent les 
particularités (cf ce même numéro, ‘‘du nouveau pour le 
clavier‘* par Tony LUZY). 

Quoiqu'il en soit, si l'affectation des touches est modifiée, 
le dessin qui les identifie reste invariable et nous pouvons 
vous proposer de, soit utiliser des sticks auto-collants, soit 
d'échanger les touches entre elles. 

Quant à votre problème de second lecteur, il est certain 
qu'à la lumière du banc d'essai relatif au lecteur PACE (cf 
Echo 13) vous auriez fait un meilleur choix en vous le 
procurant car se chargeant du transfert des fichiers DBASEII 
il vous aurait permis de récupérer sur une nouvelle machine 
MS/DOS le résultat de votre travail. Enfin tout n’est pas 
perdu puisque le service entreprise se charge d'effectuer ce 
type de transfert à un coût relativement faible. 


Bernard GRIFFON 23 LA SOUTERRAINE 


Je ne peux résister à l'envie de vous faire part de mon 
plaisir à lire votre revue que j'attends chaque mois avec 
impatience. 





EN BASIC MALLARD 


La façon de saisir un programme Basic a fait l’objet d’une 
étude approfondie dans l’'Echo du PCW N°1 in ‘Un départ 
saisissant‘ qui reste complémentaire au livre 2 livré avec les 
PCW. 


Résumé : 


Allumez l'ordinateur et insérez la face 2 de la disquette 
système. À l'affichage de ‘A>'' tapez BASIC suivi d’une 
pression sur [RETURN]. Une fois sous basic, lancez la 
numérotation automatique par AUTO +[RETURNI. 


A chaque numéro de ligne affiché, tapez son contenu 
conformément au listing de l’article. 


Pour sortir du mode AUTO afin de corriger une ou 
plusieurs lignes, tapez [STOP]. 


Pour corriger une ligne, tapez EDIT suivi de son numéro et 
d’une pression sur [RETURN]. 

Exemple : EDIT 10 [RETURN] 

Pour lister sans corriger, tapez LIST [RETURN]. 

Exemple : LIST 10 [RETURN] ou LIST -100 [RETURN] 
ou LIST 10-100 [RETURN] ou LIST [RETURN] 

Faites des sauvegardes régulières du programme, même en 
cours de saisie, en mettant une disquette vierge en A et en 








Lisant la critique d’un lecteur dans le courrier du numéro 
12, je regrette que ce Monsieur n'ai pas autant d'humour 
que vos collaborateurs auteurs qui, s'ils sont, par définition, 
techniques, n’en demeurent pas moins distrayants et 
procurent à bon nombre d’entre nous, outre des 
informations passionnantes, de bons moments de détente. 


Je lis l'Echo depuis le premier numéro et ce ne sont pas 
quelques erreurs dans certains listings qui me feront 
abandonner votre revue. Je suis d’ailleurs un de ceux qui ont 
eu le ‘‘courage"* de taper certains de ces programmes qui 
fonctionnent parfaitement ; quant aux listings renfermant des 
erreurs, ils sont généralement rectifiés le mois suivant, ce 
qui laisse largement le temps aux plus chevronnés (et 
‘‘courageux'‘) de trouver les erreurs eux-mêmes. 


J'ai trouvé votre article sur la P.A.O et le banc d'essai du 
DTP-PAO passionnant et j'ai passé commande à son 
distributeur qui m'a, soit dit en passant, très bien renseigné 
par téléphone. À quand un banc d'essai sur le scanner 
POWER MASTERSCAN ? 


Un grand salut à tous et de grosses bises à Madame 
LACAILLE dont les articles m'ont bien aidé pour le choix 
de ma comptabilité. 


L'ECHO 


Encore une fois, votre avis est le bienvenu. Aucun journal 
ne pourrait progresser sans une collaboration avec ses 
lecteurs. Critiques et suggestions sont toujours 
soigneuseument prises en compte. 


Au sujet des erreurs relatives à certains programmes nous 
n'irons pas jusqu'à dire comme Oscar WILDE que 
l'expérience est le nom que chacun donne à ses erreurs, 
mais que nos erreurs servent à votre expérience puisque les 
problèmes qu'elles posent incitent à trouver des solutions 
qui ne peuvent qu'apporter à ceux qui les cherchent ? 
Pensez au fait que les meilleurs programmes du marché sont 
souvent truffés de bogues (erreurs de programmation) et 
que ce sont souvent les utilisateurs qui les découvrent et 
permettent leur solution. 


Pour le MASTERSCAN, vous voici exaucé (cf ne numéro) 
et pour les bises à Madame LACAILLE, nous confions à 
Pierre PAND la délicate mission de les lui transmettre. 
C'est un spécialiste ! 





tapant : SAVE “Nom du programme“ [RETURN]. 
Exemple : SAVE “ECHO“ [RETURN]. 


Conseils : 
Ne lancez jamais un programme avant d’en avoir fait 
une sauvegarde. 


Utilisez les mêmes noms que ceux conseillés par l'auteur 
(dans son article ou sur la disquette qui l'accompagne). 
Vérifiez ligne par ligne que ce que vous avez tapé est 
strictement identique à ce qu'indique le listing. Soyez 
particulièrement vigilant dans les cas suivants : 

Ne confondez pas : point virgule et deux points, point et 
virgule, i majuscule et | minuscule ou le chiffre 1. 

Respectez : les espaces, les guillemets, les REM et les 
numéros de lignes. 

Ne modifiez pas un programme avant d’être certain qu'il 
fonctionne totalement. 

Les erreurs se produisent rarement dans la ligne responsable 
de celles-ci. Seule SYNTAX ERROR ou erreur de syntaxe 
dans la saisie, arrive dans une ligne mal écrite. c'est pour 
cette raison que le basic Mallard l’édite automatiquement. 
Dans tous les cas, reportez-vous à l'annexe II du manuel 
Amstrad. 
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